(detect-paragraph-cited-prefix): Use `line-beginning-position' and
authormorioka <morioka>
Tue, 20 Jul 1999 05:09:37 +0000 (05:09 +0000)
committermorioka <morioka>
Tue, 20 Jul 1999 05:09:37 +0000 (05:09 +0000)
`line-end-position'.

mu-cite.el

index eca66a6..eb7ad2f 100644 (file)
@@ -371,9 +371,8 @@ TABLE defaults to the current buffer's category table."
     (goto-char (point-min))
     (let ((i 0)
          (prefix
-          (buffer-substring
-           (progn (beginning-of-line)(point))
-           (progn (end-of-line)(point))))
+          (buffer-substring (line-beginning-position)
+                            (line-end-position)))
          str ret)
       (while (and (= (forward-line) 0)
                  (setq str (buffer-substring