Index: emacs/lisp/gnus/gnus-util.el
diff -c emacs/lisp/gnus/gnus-util.el:1.26 emacs/lisp/gnus/gnus-util.el:1.27
*** emacs/lisp/gnus/gnus-util.el:1.26 Fri May 27 04:08:12 2005
--- emacs/lisp/gnus/gnus-util.el Mon May 30 08:20:18 2005
***************
*** 1016,1025 ****
(apply 'run-hooks funcs)))
(defun gnus-run-mode-hooks (&rest funcs)
! "Run `run-mode-hooks' if it is available. Otherwise run `run-hooks'."
(if (fboundp 'run-mode-hooks)
! (apply 'run-mode-hooks funcs)
! (apply 'run-hooks funcs)))
;;; Various
--- 1016,1026 ----
(apply 'run-hooks funcs)))
(defun gnus-run-mode-hooks (&rest funcs)
! "Run `run-mode-hooks' if it is available, otherwise `run-hooks'.
! This function saves the current buffer."
(if (fboundp 'run-mode-hooks)
! (save-current-buffer (apply 'run-mode-hooks funcs))
! (save-current-buffer (apply 'run-hooks funcs))))
;;; Various
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
