From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 24 Apr 2003 01:57:46 +0000 (+0000)
Subject: (back-to-indentation): Call backward-prefix-chars.
X-Git-Tag: ttn-vms-21-2-B4~10432
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b986346637b8ed9e1e79355a2707f42d7ace37fe;p=emacs.git

(back-to-indentation): Call backward-prefix-chars.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 4726dffecd7..ff4b83a77a8 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -369,7 +369,9 @@ useful for editing binary files."
   (interactive)
   (beginning-of-line 1)
   (let ((limit (line-end-position)))
-    (skip-syntax-forward " " limit)))
+    (skip-syntax-forward " " limit))
+  ;; Move back over chars that have whitespace syntax but have the p flag.
+  (backward-prefix-chars))
 
 (defun fixup-whitespace ()
   "Fixup white space between objects around point.