[Lxr-commits] CVS: lxr/lib/LXR/Files BK.pm,1.1.2.9,1.1.2.10

[Malcolm B. <mb...@us...>]

Update of /cvsroot/lxr/lxr/lib/LXR/Files
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14969/lib/LXR/Files

Modified Files:
      Tag: bk-dev-branch
	BK.pm 
Log Message:
Fix off-by-one error in months

Index: BK.pm
===================================================================
RCS file: /cvsroot/lxr/lxr/lib/LXR/Files/Attic/BK.pm,v
retrieving revision 1.1.2.9
retrieving revision 1.1.2.10
diff -u -d -r1.1.2.9 -r1.1.2.10
--- BK.pm	19 Feb 2005 22:22:09 -0000	1.1.2.9
+++ BK.pm	20 Feb 2005 21:42:25 -0000	1.1.2.10
@@ -99,7 +99,7 @@
 		chomp $time;
 		my ($yr, $mth, $day, $hr, $min, $sec) =
 		  $time =~ m/(....)(..)(..)(..)(..)(..)/;
-		$info->{'filetime'} = timegm($sec, $min, $hr, $day, $mth, $yr);
+		$info->{'filetime'} = timegm($sec, $min, $hr, $day, $mth-1, $yr);
 	}
 
 	return $info->{'filetime'};