diff options
| -rw-r--r-- | lisp/emacs-lisp/pp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el index f7e6afb4952..90f9323acd4 100644 --- a/lisp/emacs-lisp/pp.el +++ b/lisp/emacs-lisp/pp.el @@ -41,8 +41,8 @@ that `read' can handle, whenever this is possible." (while (not (eobp)) ;; (message "%06d" (- (point-max) (point))) (cond - ((looking-at "\\s\(") - (while (looking-at "\\s(") + ((looking-at "\\s(\\|#\\s(") + (while (looking-at "\\s(\\|#\\s(") (forward-char 1))) ((and (looking-at "\\(quote[ \t]+\\)\\([^.)]\\)") (> (match-beginning 1) 1) |