# HG changeset patch
# User Steve Kemp <steve@steve.org.uk>
# Date 1210956400 -3600
# Node ID 8e5c67bc95db31ea512c238339b717e23ed91043
# Parent  e60d2e74f3dc6fbf4b18ab446153d6eaef0c0de9
   BugFIX

diff -r e60d2e74f3dc -r 8e5c67bc95db bin/chronicle
--- a/bin/chronicle	Fri May 16 17:43:01 2008 +0100
+++ b/bin/chronicle	Fri May 16 17:46:40 2008 +0100
@@ -834,9 +834,9 @@
     #  Parse and return the date
     #
     my ( $ss1, $mm1, $hh1, $day1, $month1, $year1, $zone1 ) =
-      strptime( $a->{ 'date' } );
+      strptime( $a->{ 'pubdate' } );
     my ( $ss2, $mm2, $hh2, $day2, $month2, $year2, $zone2 ) =
-      strptime( $b->{ 'date' } );
+      strptime( $b->{ 'pubdate' } );
 
     #
     # Abort if we didn't work.