; Fix previous commit

The printer otherwise includes the 0x prefix.
* lisp/emacs-lisp/cl-print.el: Add 0x to format.
This commit is contained in:
Mark Oteiza 2017-09-11 21:23:38 -04:00
parent 23252d4ccf
commit f6474b4808

View file

@ -131,7 +131,7 @@ into a button whose action shows the function's disassembly.")
(let ((button-start (and cl-print-compiled-button
(bufferp stream)
(with-current-buffer stream (point)))))
(princ (format "#<bytecode %x>" (sxhash object)) stream)
(princ (format "#<bytecode 0x%x>" (sxhash object)) stream)
(when (eq cl-print-compiled 'static)
(princ " " stream)
(cl-print-object (aref object 2) stream))