diff options
| author | Teodor Zlatanov <tzz@lifelogs.com> | 2010-10-07 03:49:38 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-10-07 03:49:38 +0000 |
| commit | cbabe91fdce9313ffc3f72e0a828b86580661dac (patch) | |
| tree | b2e1089233cfae029b3f4d5ba5f545044bdecc0e /lisp/gnus/gnus-util.el | |
| parent | 58d1ac6d6d7c7634b3ecb7e0cf3f0c67db319b9b (diff) | |
| download | emacs-cbabe91fdce9313ffc3f72e0a828b86580661dac.tar.gz emacs-cbabe91fdce9313ffc3f72e0a828b86580661dac.tar.bz2 emacs-cbabe91fdce9313ffc3f72e0a828b86580661dac.zip | |
gnus-int.el, gnus-util.el: Gnus hooks for the mark get/set operations.
gnus-sync.el: Update docs to explain state and plans.
auth-source.el: Update docs with TODO items.
Diffstat (limited to 'lisp/gnus/gnus-util.el')
| -rw-r--r-- | lisp/gnus/gnus-util.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el index b3f73d71fd5..30bc72b2348 100644 --- a/lisp/gnus/gnus-util.el +++ b/lisp/gnus/gnus-util.el @@ -1290,6 +1290,11 @@ ARG is passed to the first function." (save-current-buffer (apply 'run-hooks funcs))) +(defun gnus-run-hook-with-args (hook &rest args) + "Does the same as `run-hook-with-args', but saves the current buffer." + (save-current-buffer + (apply 'run-hook-with-args hook args))) + (defun gnus-run-mode-hooks (&rest funcs) "Run `run-mode-hooks' if it is available, otherwise `run-hooks'. This function saves the current buffer." |