Mercurial > hg > xemacs-beta

diff lisp/lisp-mode.el @ 446:1ccc32a20af4 r21-2-38

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-38
author cvs
date Mon, 13 Aug 2007 11:37:21 +0200
parents abe6d1db359e
children 223736d75acb
line wrap: on
line diff
--- a/lisp/lisp-mode.el	Mon Aug 13 11:36:20 2007 +0200
+++ b/lisp/lisp-mode.el	Mon Aug 13 11:37:21 2007 +0200
@@ -545,7 +545,7 @@
       (if (and (looking-at "\\s<") (not (looking-at "\\s<\\s<")))
 	  ;; Single-semicolon comment lines should be indented
 	  ;; as comment lines, not as code.
-	  (progn (indent-for-comment) (forward-char -1))
+	  (progn (indent-for-comment) (backward-char 1))
 	(if (listp indent) (setq indent (car indent)))
 	(setq shift-amt (- indent (current-column)))
 	(if (zerop shift-amt)