X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fparagraphs.el;h=f26eb4291f73aac5740c0c967a98b33b668cd618;hb=5fdef766338d8616721791d753d0fc2737433e5b;hp=0d209a9eac57b7653198f458c84a529c94f74462;hpb=98a6e4055a1fa624c592ac06f79287d55196ca37;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/paragraphs.el b/lisp/paragraphs.el
index 0d209a9..f26eb42 100644
--- a/lisp/paragraphs.el
+++ b/lisp/paragraphs.el
@@ -188,7 +188,7 @@ to which the end of the previous line belongs, or the end of the buffer."
 	  nil
 	(setq start (point))
 	;; Move back over paragraph-separating lines.
-	(forward-char -1) (beginning-of-line)
+	(backward-char 1) (beginning-of-line)
 	(while (and (not (bobp))
 		    (progn (move-to-left-margin)
 			   (looking-at paragraph-separate)))
@@ -335,7 +335,7 @@ negative arg -N means kill forward to Nth end of paragraph."
 (defun end-of-paragraph-text ()
   (let ((opoint (point)))
     (forward-paragraph 1)
-    (if (eq (char-before (point)) ?\n) (forward-char -1))
+    (if (eq (char-before (point)) ?\n) (backward-char 1))
     (if (<= (point) opoint)
 	(progn
 	  (forward-char 1)