# HG changeset patch
# User Steve Kemp <steve@steve.org.uk>
# Date 1197481084 0
# Node ID 19148729b49194086d662d2e07a47fa02051ee0f
# Parent  cd27fd5552720f4cf5c23ee040170324e817ffd1
  Updated the formatting of date++time on comments

diff -r cd27fd555272 -r 19148729b491 bin/chronicle
--- a/bin/chronicle	Wed Dec 12 17:33:22 2007 +0000
+++ b/bin/chronicle	Wed Dec 12 17:38:04 2007 +0000
@@ -1633,7 +1633,17 @@
         if ( $file =~ /^(.*)\.([^.]+)$/ )
         {
             $date = $2;
+
+            if ( $date =~ /(.*)-([0-9:]+)/ )
+            {
+                my $d = $1;
+                my $t = $2;
+
+                $d =~ s/-/ /g;
+                $date = "Submitted at $t on $d";
+            }
         }
+
         open( COMMENT, "<", $file )
           or next;