Quassia Gnus v0.30.

[elisp/gnus.git-] / lisp / nnfolder.el

diff --git a/lisp/nnfolder.el b/lisp/nnfolder.el
index 9945b2f..56ca0d6 100644 (file)
--- a/lisp/nnfolder.el
+++ b/lisp/nnfolder.el
@@ -572,8 +572,8 @@ time saver for large mailboxes.")
     (setq save-list group-art-list)
     (nnmail-insert-lines)
     (nnmail-insert-xref group-art-list)
-    (gnus-run-hooks 'nnmail-prepare-save-mail-hook)
-    (gnus-run-hooks 'nnfolder-prepare-save-mail-hook)
+    (run-hooks 'nnmail-prepare-save-mail-hook)
+    (run-hooks 'nnfolder-prepare-save-mail-hook)
 
     ;; Insert the mail into each of the destination groups.
     (while (setq group-art (pop group-art-list))
@@ -783,7 +783,7 @@ time saver for large mailboxes.")
 (defun nnfolder-save-buffer ()
   "Save the buffer."
   (when (buffer-modified-p)
-    (gnus-run-hooks 'nnfolder-save-buffer-hook)
+    (run-hooks 'nnfolder-save-buffer-hook)
     (gnus-make-directory (file-name-directory (buffer-file-name)))
     (save-buffer)))