calendar.format: allow UTC to be in rfc822 timestamps.

2016-12-31 13:22:49 -08:00 · 2016-12-31 13:22:49 -08:00 · 556a2b2b5b
parent 4d580d95bf
commit 556a2b2b5b
1 changed files with 1 additions and 1 deletions
--- a/basis/calendar/format/format.factor
+++ b/basis/calendar/format/format.factor
@ -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