Parent Directory | Revision Log | Patch
revision 1.597 by rms, Mon Apr 21 01:35:20 2003 UTC | revision 1.598 by rms, Thu Apr 24 01:57:46 2003 UTC | |
---|---|---|
# | Line 369 useful for editing binary files." | Line 369 useful for editing binary files." |
369 | (interactive) | (interactive) |
370 | (beginning-of-line 1) | (beginning-of-line 1) |
371 | (let ((limit (line-end-position))) | (let ((limit (line-end-position))) |
372 | (skip-syntax-forward " " limit))) | (skip-syntax-forward " " limit)) |
373 | ;; Move back over chars that have whitespace syntax but have the p flag. | |
374 | (backward-prefix-chars)) | |
375 | ||
376 | (defun fixup-whitespace () | (defun fixup-whitespace () |
377 | "Fixup white space between objects around point. | "Fixup white space between objects around point. |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |