# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1120053149 0
# Node ID dd7fb3231397969f45c996204bd053834fd0fe7b
# Parent  45ed77379ac6d0527d978be5fbf42bbd65fc3987
(pp-buffer): Change space constants followed by a sexp to "?\s ".

diff -r 45ed77379ac6 -r dd7fb3231397 lisp/emacs-lisp/pp.el
--- 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)))