[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-uu.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        07/10/02 20:41:51

Index: gnus-uu.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/gnus/gnus-uu.el,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -b -r1.27 -r1.28
--- gnus-uu.el  26 Jul 2007 05:27:00 -0000      1.27
+++ gnus-uu.el  2 Oct 2007 20:41:50 -0000       1.28
@@ -1089,7 +1089,7 @@
                                nil t)
            (replace-match "\\1[0-9]+\\2[0-9]+" t nil nil nil))))
 
-    (goto-char 1)
+    (goto-char (point-min))
     (while (re-search-forward "[ \t]+" nil t)
       (replace-match "[ \t]+" t t))
 
@@ -1190,7 +1190,7 @@
             (format "%06d"
                     (string-to-number (buffer-substring
                                     (match-beginning 0) (match-end 0)))))))
-       (setq string (buffer-substring 1 (point-max)))
+       (setq string (buffer-substring (point-min) (point-max)))
        (setcar (car string-list) string)
        (setq string-list (cdr string-list))))
     out-list))