From 3f0f387cbe0b7067119c75d7e9581032a0922662 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Thu, 9 Aug 2018 22:04:08 -0400
Subject: [PATCH] calendar.parser: fix : in word name

---
 basis/calendar/parser/parser.factor | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/basis/calendar/parser/parser.factor b/basis/calendar/parser/parser.factor
index dde5635df1..88536c0800 100644
--- a/basis/calendar/parser/parser.factor
+++ b/basis/calendar/parser/parser.factor
@@ -94,7 +94,7 @@ CONSTANT: rfc822-named-zones H{
         ]
     } cond ;
 
-: read-hh:mm:ss ( -- hh mm ss )
+: read-hh-mm-ss ( -- hh mm ss )
     ":" read-token checked-number
     ":" read-token checked-number
     read-sp checked-number ;
@@ -105,7 +105,7 @@ CONSTANT: rfc822-named-zones H{
     read-sp checked-number
     read-sp month-abbreviations index 1 + check-timestamp
     read-sp checked-number spin
-    read-hh:mm:ss
+    read-hh-mm-ss
     " " read-until drop parse-rfc822-gmt-offset <timestamp> ;
 
 : rfc822>timestamp ( str -- timestamp )
@@ -121,7 +121,7 @@ CONSTANT: rfc822-named-zones H{
     "-" read-token checked-number
     "-" read-token month-abbreviations index 1 + check-timestamp
     read-sp checked-number spin
-    read-hh:mm:ss
+    read-hh-mm-ss
     " " read-until drop parse-rfc822-gmt-offset <timestamp> ;
 
 : cookie-string>timestamp-1 ( str -- timestamp )
@@ -131,7 +131,7 @@ CONSTANT: rfc822-named-zones H{
     read-sp check-day-name
     read-sp month-abbreviations index 1 + check-timestamp
     read-sp checked-number
-    read-hh:mm:ss
+    read-hh-mm-ss
     [ read-sp checked-number ] 5 ndip
     " " read-until drop parse-rfc822-gmt-offset <timestamp> ;