# HG changeset patch
# User Steve Kemp <steve@steve.org.uk>
# Date 1210955815 -3600
# Node ID 86e95adc325b010426dd5ac02c5ece014b824c1d
# Parent  9537c32b1e95295347de2284dea233b2e075ec2d
  Don't discard times when sorting by date.

diff -r 9537c32b1e95 -r 86e95adc325b bin/chronicle
--- a/bin/chronicle	Sun May 04 13:49:00 2008 +0100
+++ b/bin/chronicle	Fri May 16 17:36:55 2008 +0100
@@ -845,8 +845,8 @@
     #
     #  Convert to compare
     #
-    my $c = timelocal( 0, 0, 0, $day1, $month1, $year1 + 1900 );
-    my $d = timelocal( 0, 0, 0, $day2, $month2, $year2 + 1900 );
+    my $c = timelocal( $ss1, $mm1, $hh1, $day1, $month1, $year1 + 1900 );
+    my $d = timelocal( $ss2, $mm2, $hh2, $day2, $month2, $year2 + 1900 );
 
     return $d <=> $c;
 }