# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1051149466 0
# Node ID ee0efd6ecb89fcc50abd96383aa3604f913073d6
# Parent  21af30889a418fd2bf511acb4f4cbcff2626ec91
(back-to-indentation): Call backward-prefix-chars.

diff -r 21af30889a41 -r ee0efd6ecb89 lisp/simple.el
--- a/lisp/simple.el	Thu Apr 24 01:56:55 2003 +0000
+++ b/lisp/simple.el	Thu Apr 24 01:57:46 2003 +0000
@@ -369,7 +369,9 @@
   (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.