[bknr-cvs] r2118 - trunk/bknr/src/utils

[bknr at bknr.net]

Author: hhubner
Date: 2006-12-19 00:16:17 -0500 (Tue, 19 Dec 2006)
New Revision: 2118

Modified:
   trunk/bknr/src/utils/utils.lisp
Log:
fix off-by-one error for month in javascript date formatter.


Modified: trunk/bknr/src/utils/utils.lisp
===================================================================
--- trunk/bknr/src/utils/utils.lisp	2006-12-18 19:15:59 UTC (rev 2117)
+++ trunk/bknr/src/utils/utils.lisp	2006-12-19 05:16:17 UTC (rev 2118)
@@ -42,7 +42,7 @@
 		 year month day hour min sec))
 	(js-style
 	 (format s "new Date(~D, ~D, ~D, ~D, ~D, ~D)"
-		 year month day hour min sec))
+		 year (1- month) day hour min sec))
 	(t
 	 (when show-weekday
 	   (format s "~a " weekday))