Fix zero-dates-to-null to work with datetime and date string.

This commit is contained in:
Dimitri Fontaine 2013-11-13 22:35:30 +01:00
parent 27f485b4d6
commit 79fd109644

View File

@ -32,7 +32,7 @@
((null date-string) nil)
((string= date-string "") nil)
;; day is 00
((string= date-string "0000-00-00" :start1 8 :start2 8 ) nil)
((string= date-string "0000-00-00" :start1 8 :end1 10 :start2 8 ) nil)
;; month is 00
((string= date-string "0000-00-00" :start1 5 :end1 7 :start2 5 :end2 7) nil)
((string= date-string "0000-00-00") nil)