X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Flisp.el;h=c0db1a2f97124f15ce65001d6987c4cc4191e79f;hb=d34741dd7fc8cca69512739dd3d392ee303e6905;hp=4226730c9fce073287645b3533449b678d43fb17;hpb=98a6e4055a1fa624c592ac06f79287d55196ca37;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/lisp.el b/lisp/lisp.el
index 4226730..c0db1a2 100644
--- a/lisp/lisp.el
+++ b/lisp/lisp.el
@@ -206,7 +206,7 @@ the open-parenthesis that starts a defun; see `beginning-of-defun'."
 			  (end-of-line 1)
 			  (beginning-of-defun-raw 1)))
 		    nil
-		  (or (bobp) (forward-char -1))
+		  (or (bobp) (backward-char 1))
 		  (beginning-of-defun-raw -1))
 		(setq first nil)
 		(forward-list 1)
@@ -279,7 +279,7 @@ before and after, depending on the surrounding characters."
   "Move past next `)', delete indentation before it, then indent after it."
   (interactive)
   (up-list 1)
-  (forward-char -1)
+  (backward-char 1)
   (while (save-excursion		; this is my contribution
 	   (let ((before-paren (point)))
 	     (back-to-indentation)