X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;ds=sidebyside;f=sql%2Ftime.lisp;h=4e8b6af25ce6c6128bc192d837b3952d25416746;hb=2135bfa98887e609e060f30c0b04130075089788;hp=32c10b70227f3dfc1950d3a459b8f1b1e506677d;hpb=e567409d9fff3f7231c2a0bb69b345e19de2b246;p=clsql.git

diff --git a/sql/time.lisp b/sql/time.lisp
index 32c10b7..4e8b6af 100644
--- a/sql/time.lisp
+++ b/sql/time.lisp
@@ -852,6 +852,9 @@ with the given options"
            (if stream
                (write-string string stream)
              string)))
+	(:iso8601 
+         (format stream "~4,'0D-~2,'0D-~2,'0DT~2,'0D:~2,'0D:~2,'0D.~DZ"
+                 year month day hour minute second usec))
         (t
          (format stream "~2,'0D~A~2,'0D~A~2,'0D~A~2,'0D~A~2,'0D~A~2,'0D.~6,'0D"
                  year date-separator month date-separator day