diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2005-06-29 13:52:29 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2005-06-29 13:52:29 +0000 |
| commit | 1bcb666b4491f54f70184ae0d55389d16e12a0f5 (patch) | |
| tree | 049f8f77f58d43c56cba921c8e7b698927df0f55 /lisp/emacs-lisp | |
| parent | c611c9dc53e0bcd5003ea8bdfca98c83b7b6ae5f (diff) | |
| download | emacs-1bcb666b4491f54f70184ae0d55389d16e12a0f5.tar.gz | |
(pp-buffer): Change space constants followed by a sexp to "?\s ".
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/pp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el index 93e30fb0f55..d9f3df99bae 100644 --- a/lisp/emacs-lisp/pp.el +++ b/lisp/emacs-lisp/pp.el @@ -67,7 +67,7 @@ to make output that `read' can handle, whenever this is possible." (save-excursion (backward-char 1) (skip-chars-backward "'`#^") - (when (and (not (bobp)) (memq (char-before) '(?\ ?\t ?\n))) + (when (and (not (bobp)) (memq (char-before) '(?\s ?\t ?\n))) (delete-region (point) (progn (skip-chars-backward " \t\n") (point))) |