Importing Pterodactyl Gnus 0.42.
[elisp/gnus.git-] / lisp / message.el
index 86b5a9c..0f746c6 100644 (file)
@@ -2644,7 +2644,8 @@ If NOW, use that time instead."
         (zone (nth 8 (decode-time now)))
         (sign "+"))
     (when (< zone 0)
-      (setq sign ""))
+      (setq sign "-")
+      (setq zone (- zone)))
     (concat
      (format-time-string "%d" now)
      ;; The month name of the %b spec is locale-specific.  Pfff.