[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-util.el

[Miles Bader]

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