From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 24 Sep 2008 05:57:00 +0000 (+0000)
Subject: Eliminate ISO8601-SEPARATE-WITH-T?; according to the standard, the T
X-Git-Tag: 20090517-FFI~120
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=78de984c4ae4615b583b91675ca8c996cfa8dbe1;p=mit-scheme.git

Eliminate ISO8601-SEPARATE-WITH-T?; according to the standard, the T
is required and using space is incorrect.
---

diff --git a/v7/src/runtime/datime.scm b/v7/src/runtime/datime.scm
index 05962f445..bb38ce9b9 100644
--- a/v7/src/runtime/datime.scm
+++ b/v7/src/runtime/datime.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: datime.scm,v 14.53 2008/09/09 16:30:47 cph Exp $
+$Id: datime.scm,v 14.54 2008/09/24 05:56:56 cph Exp $
 
 Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
@@ -538,7 +538,7 @@ USA.
   (write-d2 (decoded-time/month dt) port)
   (write-char #\- port)
   (write-d2 (decoded-time/day dt) port)
-  (write-char (if iso8601-separate-with-t? #\T #\space) port)
+  (write-char #\T port)
   (write-d2 (decoded-time/hour dt) port)
   (write-char #\: port)
   (write-d2 (decoded-time/minute dt) port)
@@ -551,8 +551,6 @@ USA.
 			     zone)
 			 port))))
 
-(define iso8601-separate-with-t? #t)
-
 (define (universal-time->local-iso8601-string time)
   (decoded-time->iso8601-string (universal-time->local-decoded-time time)))
 
diff --git a/v7/src/runtime/runtime.pkg b/v7/src/runtime/runtime.pkg
index 5f419c0fe..4d9c68d15 100644
--- a/v7/src/runtime/runtime.pkg
+++ b/v7/src/runtime/runtime.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: runtime.pkg,v 14.686 2008/09/23 23:59:19 cph Exp $
+$Id: runtime.pkg,v 14.687 2008/09/24 05:57:00 cph Exp $
 
 Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
     1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
@@ -1301,7 +1301,6 @@ USA.
 	  global-decoded-time
 	  guarantee-decoded-time
 	  guarantee-time-zone
-	  iso8601-separate-with-t?
 	  iso8601-string->decoded-time
 	  iso8601-string->file-time
 	  iso8601-string->universal-time