mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-21 18:23:59 +00:00
Code Issues Releases Activity

(message-make-date): Handle byte-compiler warnings differently.

Browse Source
This commit is contained in:
Lute Kamstra 2005-04-11 16:09:59 +00:00
parent d694ccd7e5
commit 4e03f7e70f
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/gnus/message.el
View File

@ -4564,12 +4564,11 @@ Otherwise, generate and save a value for `canlock-password' first."
(when (re-search-forward ",+$" nil t)
(replace-match "" t t))))))
(eval-when-compile (require 'parse-time))
(defun message-make-date (&optional now)
"Make a valid data header.
If NOW, use that time instead."
(require 'parse-time)
(defvar parse-time-weekdays)
(defvar parse-time-months)
(let* ((now (or now (current-time)))
(zone (nth 8 (decode-time now)))
(sign "+"))