]> gitweb.factorcode.org Git - factor.git/commitdiff
calendar.format: allow UTC to be in rfc822 timestamps.
authorJohn Benediktsson <mrjbq7@gmail.com>
Sat, 31 Dec 2016 21:22:49 +0000 (13:22 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Sat, 31 Dec 2016 21:22:49 +0000 (13:22 -0800)
basis/calendar/format/format.factor

index e153bb2138fe35cab9b55bf87f8a1ca73b1a477a..f5c799365c73b65afadb0caa2f159c96141c4195 100644 (file)
@@ -213,7 +213,7 @@ ERROR: invalid-timestamp-format ;
     string>number check-timestamp ;
 
 : parse-rfc822-gmt-offset ( string -- dt )
-    dup "GMT" = [ drop instant ] [
+    dup { "UTC" "GMT" } member? [ drop instant ] [
         unclip [
             2 cut [ string>number ] bi@ [ hours ] [ minutes ] bi* time+
         ] dip signed-gmt-offset