Update of /project/mcclim/cvsroot/mcclim/Apps/Inspector In directory common-lisp.net:/tmp/cvs-serv4106

Modified Files: inspector.lisp Log Message: Bug fix: printed iso 8601 time stamp claims to be in UTC (as indicated by the trailing Z), but was in local time.

Date: Tue Sep 13 13:07:41 2005 Author: varkesteijn

Index: mcclim/Apps/Inspector/inspector.lisp diff -u mcclim/Apps/Inspector/inspector.lisp:1.32 mcclim/Apps/Inspector/inspector.lisp:1.33 --- mcclim/Apps/Inspector/inspector.lisp:1.32 Tue Apr 26 23:35:24 2005 +++ mcclim/Apps/Inspector/inspector.lisp Tue Sep 13 13:07:40 2005 @@ -599,7 +599,7 @@ "Return the given universal time in ISO 8601 format. This will raise an error if the given time is not a decodable universal time." (multiple-value-bind (sec min hour date month year) - (decode-universal-time time) + (decode-universal-time time 0) (format nil "~4,'0D-~2,'0D-~2,'0DT~2,'0D:~2,'0D:~2,'0DZ" year month date hour min sec)))