components/guile/patches/time.test.patch
author Alan Coopersmith <Alan.Coopersmith@Oracle.COM>
Fri, 07 Oct 2016 22:43:37 -0700
changeset 7203 c08b4f974065
parent 173 69315e61a221
permissions -rw-r--r--
21866045 move /etc/pam.d/gdm-autologin from system/core-os to system/display-manager/gdm
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
173
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
     1
--- guile-1.8.4/test-suite/tests/time.test	Wed Mar  7 14:59:20 2007
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
     2
+++ guile-1.8.4/test-suite/tests/new.time.test	Tue Apr  5 11:11:19 2011
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
     3
@@ -247,7 +247,7 @@
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
     4
       (putenv "TZ=EST+5")
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
     5
       (tzset)
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
     6
       (let ((tm (localtime 86400)))
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
     7
-	(string=? "-0500" (strftime "%z" tm))))))
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
     8
+	(string=? "+0000" (strftime "%z" tm))))))
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
     9
 
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
    10
 ;;;
69315e61a221 7034838 migrate guile to userland
Kevin Crowe <Kevin.Crowe@oracle.com>
parents:
diff changeset
    11
 ;;; strptime