summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-11-21 14:09:32 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2019-11-21 14:09:32 +0100
commitbc4190b3f4c3b47bb2f5a955236a6d7195d8a748 (patch)
tree0d19f7842371966f569bf392eaa004a246457ad2 /lisp/emacs-lisp
parent4a13c2af9b98176f2e51061c525313e8af1a0231 (diff)
downloademacs-bc4190b3f4c3b47bb2f5a955236a6d7195d8a748.tar.gz
emacs-bc4190b3f4c3b47bb2f5a955236a6d7195d8a748.tar.bz2
emacs-bc4190b3f4c3b47bb2f5a955236a6d7195d8a748.zip
Make pp-buffer into a command
* lisp/emacs-lisp/pp.el (pp-buffer): Make into a command (bug#38306).
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/pp.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el
index de4cbfc0e10..ca5114eddf9 100644
--- a/lisp/emacs-lisp/pp.el
+++ b/lisp/emacs-lisp/pp.el
@@ -53,6 +53,7 @@ to make output that `read' can handle, whenever this is possible."
;;;###autoload
(defun pp-buffer ()
"Prettify the current buffer with printed representation of a Lisp object."
+ (interactive)
(goto-char (point-min))
(while (not (eobp))
;; (message "%06d" (- (point-max) (point)))