* nnheader.el (nnheader-find-file-noselect): Added doc string.

* nnfolder.el (nnfolder-read-folder): Use RAWFILE for
`nnheader-find-file-noselect' to avoid
`large-file-warning-threshold'.

* gnus-group.el (gnus-group-clear-data): Mention process/prefix in
doc string.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 320eb58..270da6c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,8 +1,17 @@
 2005-02-24  Reiner Steib  <Reiner.Steib@gmx.de>
 
+       * nnheader.el (nnheader-find-file-noselect): Added doc string.
+
+       * nnfolder.el (nnfolder-read-folder): Use RAWFILE for
+       `nnheader-find-file-noselect' to avoid
+       `large-file-warning-threshold'.
+
        * gnus-sum.el (gnus-summary-caesar-message): Apply
        `gnus-treat-article' after rotation.
 
+       * gnus-group.el (gnus-group-clear-data): Mention process/prefix in
+       doc string.
+
 2005-02-22  Simon Josefsson  <jas@extundo.com>
 
        * encrypt.el (encrypt-password-cache-expiry): Remove (use

diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el
index e7bbf93..79b348f 100644 (file)
--- a/lisp/gnus-group.el
+++ b/lisp/gnus-group.el
@@ -3087,7 +3087,8 @@ sort in reverse order."
 ;;; Clearing data
 
 (defun gnus-group-clear-data (&optional arg)
-  "Clear all marks and read ranges from the current group."
+  "Clear all marks and read ranges from the current group.
+Obeys the process/prefix convention."
   (interactive "P")
   (gnus-group-iterate arg
     (lambda (group)

diff --git a/lisp/nnfolder.el b/lisp/nnfolder.el
index 6a60418..054e074 100644 (file)
--- a/lisp/nnfolder.el
+++ b/lisp/nnfolder.el
@@ -873,7 +873,7 @@ deleted.  Point is left where the deleted region was."
         (buffer (set-buffer
                  (let ((nnheader-file-coding-system
                         nnfolder-file-coding-system))
-                   (nnheader-find-file-noselect file)))))
+                   (nnheader-find-file-noselect file t)))))
     (mm-enable-multibyte) ;; Use multibyte buffer for future copying.
     (if (equal (cadr (assoc group nnfolder-scantime-alist))
               (nth 5 (file-attributes file)))

diff --git a/lisp/nnheader.el b/lisp/nnheader.el
index 3b34f68..e4b7746 100644 (file)
--- a/lisp/nnheader.el
+++ b/lisp/nnheader.el
@@ -969,6 +969,8 @@ find-file-hooks, etc.
             (nnheader-insert-file-contents file)))))))
 
 (defun nnheader-find-file-noselect (&rest args)
+  "Open a file with some variables bound.
+See `find-file-noselect' for the arguments."
   (let ((format-alist nil)
        (auto-mode-alist (mm-auto-mode-alist))
        (default-major-mode 'fundamental-mode)