diff options
Diffstat (limited to 'lisp/gnus')
| -rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/gnus/gnus-util.el | 8 |
2 files changed, 7 insertions, 5 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 8d227906aca..3a8f3dac83c 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2010-10-03 Glenn Morris <rgm@gnu.org> + + * gnus-util.el (gnus-make-local-hook): Simplify. + 2010-10-02 Julien Danjou <julien@danjou.info> * gnus-util.el (gnus-iswitchb-completing-read): New function. diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el index 0bf5b66a71d..8a6d9241f07 100644 --- a/lisp/gnus/gnus-util.el +++ b/lisp/gnus/gnus-util.el @@ -149,11 +149,9 @@ This is a compatibility function for different Emacsen." ;; XEmacs. In Emacs we don't need to call `make-local-hook' first. ;; It's harmless, though, so the main purpose of this alias is to shut ;; up the byte compiler. -(defalias 'gnus-make-local-hook - (if (eq (get 'make-local-hook 'byte-compile) - 'byte-compile-obsolete) - 'ignore ; Emacs - 'make-local-hook)) ; XEmacs +(defalias 'gnus-make-local-hook (if (featurep 'xemacs) + 'make-local-hook + 'ignore) (defun gnus-delete-first (elt list) "Delete by side effect the first occurrence of ELT as a member of LIST." |