From: morioka <morioka>
Date: Tue, 20 Jul 1999 05:09:37 +0000 (+0000)
Subject: (detect-paragraph-cited-prefix): Use `line-beginning-position' and
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ad2e7297ea8aec8cef2117403d18a09e36b310f9;p=elisp%2Fmu-cite.git

(detect-paragraph-cited-prefix): Use `line-beginning-position' and
`line-end-position'.
---

diff --git a/mu-cite.el b/mu-cite.el
index eca66a6..eb7ad2f 100644
--- a/mu-cite.el
+++ b/mu-cite.el
@@ -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