X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=sql%2Ftime.lisp;h=38ad86f12f577676c2e959649a971205a0e86f0a;hb=refs%2Fheads%2F6.8.0;hp=39d9e4dc3483a70272ee06d2bdef50185556e2ea;hpb=868477640206e55887d5c017d1e47a58ef64dc47;p=clsql.git

diff --git a/sql/time.lisp b/sql/time.lisp
index 39d9e4d..38ad86f 100644
--- a/sql/time.lisp
+++ b/sql/time.lisp
@@ -146,7 +146,7 @@
       (declare (ignore _sec _min _hour _day _month _year _day-of-week))
       (when dst?
         (incf tz -1))
-      (values (- (* tz 60 60)) tz))))
+      (values (* tz 60 60) tz))))
 
 (defun time-to-utc (in)
   "Ensures that if we have a time thats not in UTC, treat it as a localtime,