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 05962f4455658b71a24f65750e1eb577c239c5a3..bb38ce9b91d5dd4d177cb468e81b570427a647a3 100644 (file)
--- 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 5f419c0fe5b8d64179fc94570dfefd98c4affc84..4d9c68d15a17b9f4c31984641bb7f5dd3a3aeb41 100644 (file)
--- 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