Mercurial > hg > xemacs-beta

diff lisp/modes/sh-script.el @ 138:6608ceec7cf8 r20-2b3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-2b3
author cvs
date Mon, 13 Aug 2007 09:31:46 +0200
parents cca96a509cfe
children 25f70ba0133c
line wrap: on
line diff
--- a/lisp/modes/sh-script.el	Mon Aug 13 09:31:13 2007 +0200
+++ b/lisp/modes/sh-script.el	Mon Aug 13 09:31:46 2007 +0200
@@ -1002,6 +1002,7 @@
   (interactive)
   (let ((previous (save-excursion
 		    (while (and (not (bobp))
+				(not (eq (point-min) (point-at-bol)))
 				(progn
 				  (forward-line -1)
 				  (back-to-indentation)