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

[Miles Bader]

Index: emacs/lisp/gnus/gnus-msg.el
diff -c emacs/lisp/gnus/gnus-msg.el:1.25 emacs/lisp/gnus/gnus-msg.el:1.26
*** emacs/lisp/gnus/gnus-msg.el:1.25    Thu Oct  7 05:53:40 2004
--- emacs/lisp/gnus/gnus-msg.el Mon Nov  1 10:41:03 2004
***************
*** 1871,1878 ****
              (setq v (with-temp-buffer
                        (insert-file-contents v)
                        (goto-char (point-max))
!                       (while (bolp)
!                         (delete-char -1))
                        (buffer-string))))
            (setq results (delq (assoc element results) results))
            (push (cons element v) results))))
--- 1871,1879 ----
              (setq v (with-temp-buffer
                        (insert-file-contents v)
                        (goto-char (point-max))
!                       (skip-chars-backward "\n")
!                       (delete-region (+ (point) (if (bolp) 0 1))
!                                      (point-max))
                        (buffer-string))))
            (setq results (delq (assoc element results) results))
            (push (cons element v) results))))