From dd1aea35e17a88666469ed15a2b6596301d7b4ba Mon Sep 17 00:00:00 2001
From: Kevin Ryde <user42@zip.com.au>
Date: Sun, 25 Jun 2006 00:18:36 +0000
Subject: [PATCH] (bdtime2c): tm_gmtoff is seconds East, so take negative of
 tm:gmtoff which is seconds West.  Reported by Aaron VanDevender.

---
 libguile/stime.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libguile/stime.c b/libguile/stime.c
index 37d2290cf..157bf3725 100644
--- a/libguile/stime.c
+++ b/libguile/stime.c
@@ -498,7 +498,7 @@ bdtime2c (SCM sbd_time, struct tm *lt, int pos, const char *subr)
   lt->tm_yday = scm_to_int (SCM_SIMPLE_VECTOR_REF (sbd_time, 7));
   lt->tm_isdst = scm_to_int (SCM_SIMPLE_VECTOR_REF (sbd_time, 8));
 #ifdef HAVE_TM_ZONE
-  lt->tm_gmtoff = scm_to_int (SCM_SIMPLE_VECTOR_REF (sbd_time, 9));
+  lt->tm_gmtoff = - scm_to_int (SCM_SIMPLE_VECTOR_REF (sbd_time, 9));
   if (scm_is_false (SCM_SIMPLE_VECTOR_REF (sbd_time, 10)))
     lt->tm_zone = NULL;
   else