changeset 63852:dd7fb3231397

(pp-buffer): Change space constants followed by a sexp to "?\s ".
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 29 Jun 2005 13:52:29 +0000
parents 45ed77379ac6
children 123dae8639ec
files lisp/emacs-lisp/pp.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/pp.el	Wed Jun 29 13:51:30 2005 +0000
+++ b/lisp/emacs-lisp/pp.el	Wed Jun 29 13:52:29 2005 +0000
@@ -67,7 +67,7 @@
       (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)))