Mercurial > emacs

diff lisp/simple.el @ 49585:8b39a07c5213

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(back-to-indentation): Skip all whitespace except for newlines.
author Richard M. Stallman <rms@gnu.org>
date Tue, 04 Feb 2003 10:41:10 +0000
parents c52c622747ca
children e88404e8f2cf
line wrap: on
line diff
--- a/lisp/simple.el	Tue Feb 04 10:40:14 2003 +0000
+++ b/lisp/simple.el	Tue Feb 04 10:41:10 2003 +0000
@@ -368,7 +368,8 @@
   "Move point to the first non-whitespace character on this line."
   (interactive)
   (beginning-of-line 1)
-  (skip-chars-forward " \t"))
+  (let ((limit (line-end-position)))
+    (skip-syntax-forward " " limit)))
 
 (defun fixup-whitespace ()
   "Fixup white space between objects around point.