[Emacs-diffs] Changes to emacs/lisp/simple.el

[Richard M. Stallman]

Index: emacs/lisp/simple.el
diff -c emacs/lisp/simple.el:1.597 emacs/lisp/simple.el:1.598
*** emacs/lisp/simple.el:1.597  Sun Apr 20 21:35:20 2003
--- emacs/lisp/simple.el        Wed Apr 23 21:57:46 2003
***************
*** 369,375 ****
    (interactive)
    (beginning-of-line 1)
    (let ((limit (line-end-position)))
!     (skip-syntax-forward " " limit)))
  
  (defun fixup-whitespace ()
    "Fixup white space between objects around point.
--- 369,377 ----
    (interactive)
    (beginning-of-line 1)
    (let ((limit (line-end-position)))
!     (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.