]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/calendar/format/format.factor
Cleanup some lint warnings.
[factor.git] / basis / calendar / format / format.factor
index ac2e902c86a82d4fc650284594ddec94bf56ac15..48c0ce6ed9af6628ec5ed7b634e1bc6ba5b7de53 100644 (file)
@@ -264,7 +264,7 @@ ERROR: invalid-timestamp-format ;
     [ (hms>timestamp) ] with-string-reader ;\r
 \r
 : (ymd>timestamp) ( -- timestamp )\r
-    read-ymd 0 0 0 instant <timestamp> ;\r
+    read-ymd <date-gmt> ;\r
 \r
 : ymd>timestamp ( str -- timestamp )\r
     [ (ymd>timestamp) ] with-string-reader ;\r