diff options
author | Katsumi Yamaoka <yamaoka@jpl.org> | 2009-09-09 10:41:50 +0000 |
---|---|---|
committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2009-09-09 10:41:50 +0000 |
commit | 5cc79e5aff4952b45c8712232565f577ff550eba (patch) | |
tree | 455180de62ed72fe0902b050010abf14a6305928 /lisp/gnus | |
parent | 38dc51ba9b5372a8035445fa3a230115def726bd (diff) |
(with-no-warnings): Define it for old Emacsen.
Diffstat (limited to 'lisp/gnus')
-rw-r--r-- | lisp/gnus/ChangeLog | 3 | ||||
-rw-r--r-- | lisp/gnus/gnus-util.el | 6 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 957881ef420..61754929324 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,6 +1,7 @@ 2009-09-09 Katsumi Yamaoka <yamaoka@jpl.org> - * gnus-util.el (gnus-float-time): Alias to float-time if it exists. + * gnus-util.el (with-no-warnings): Define it for old Emacsen. + (gnus-float-time): Alias to float-time if it exists. * ecomplete.el (with-no-warnings): Define it for old Emacsen. (ecomplete-add-item): Don't use (featurep 'xemacs) to check if diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el index 3766b3bd59d..28a8c5dbed4 100644 --- a/lisp/gnus/gnus-util.el +++ b/lisp/gnus/gnus-util.el @@ -38,6 +38,12 @@ (unless (fboundp 'declare-function) (defmacro declare-function (&rest r)))) (eval-when-compile (require 'cl)) + +(eval-when-compile + (unless (fboundp 'with-no-warnings) + (defmacro with-no-warnings (&rest body) + `(progn ,@body)))) + ;; Fixme: this should be a gnus variable, not nnmail-. (defvar nnmail-pathname-coding-system) (defvar nnmail-active-file-coding-system) |