X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Ftime.lisp;h=83e17a0a121436c65f5ee8fef17681de75ba6d88;hb=1a446890f95ab363af82529a133546d722ef21b1;hp=51cbcbef7cbb214049624c7fa29fdbfadc2ba6f6;hpb=4c88467c8be43c3e7e72ea362390620c669de117;p=clsql.git diff --git a/sql/time.lisp b/sql/time.lisp index 51cbcbe..83e17a0 100644 --- a/sql/time.lisp +++ b/sql/time.lisp @@ -447,8 +447,8 @@ (princ month stream) (princ #\- stream) (when (< day 10) (princ #\0 stream)) - (princ month stream) - (princ #\space stream) + (princ day stream) + (princ #\T stream) ;strict ISO says T here isn't optional. (when (< hour 10) (princ #\0 stream)) (princ hour stream) (princ #\: stream)