Speedups; see ChangeLog for fine details.

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

diff --git a/lisp/nnheader.el b/lisp/nnheader.el
index dafbfba..5372336 100644 (file)
--- a/lisp/nnheader.el
+++ b/lisp/nnheader.el
@@ -530,7 +530,7 @@ If FILE is t, return the buffer contents as a string."
                ;; Return the buffer contents.
                ((eq ,temp-file t)
                 (set-buffer ,temp-buffer)
-                (buffer-string))
+                (buffer-substring (point-min) (point-max)))
                ;; Save a file.
                (t
                 (set-buffer ,temp-buffer)