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

[Richard M. Stallman]

Index: emacs/lisp/simple.el
diff -c emacs/lisp/simple.el:1.590 emacs/lisp/simple.el:1.591
*** emacs/lisp/simple.el:1.590  Mon Jan 27 16:44:48 2003
--- emacs/lisp/simple.el        Tue Feb  4 05:41:10 2003
***************
*** 368,374 ****
    "Move point to the first non-whitespace character on this line."
    (interactive)
    (beginning-of-line 1)
!   (skip-chars-forward " \t"))
  
  (defun fixup-whitespace ()
    "Fixup white space between objects around point.
--- 368,375 ----
    "Move point to the first non-whitespace character on this line."
    (interactive)
    (beginning-of-line 1)
!   (let ((limit (line-end-position)))
!     (skip-syntax-forward " " limit)))
  
  (defun fixup-whitespace ()
    "Fixup white space between objects around point.