diff options
| author | Mark Oteiza <mvoteiza@udel.edu> | 2017-09-11 21:23:38 -0400 |
|---|---|---|
| committer | Mark Oteiza <mvoteiza@udel.edu> | 2017-09-11 21:23:38 -0400 |
| commit | f6474b4808363dbddeffef8d73ee3be7b3858fa3 (patch) | |
| tree | b8d24fa90967fa399fd983319915415bd9b68652 /lisp/emacs-lisp | |
| parent | 23252d4ccf0773100ccd0a08966745dbb11a3899 (diff) | |
| download | emacs-f6474b4808363dbddeffef8d73ee3be7b3858fa3.tar.gz emacs-f6474b4808363dbddeffef8d73ee3be7b3858fa3.tar.bz2 emacs-f6474b4808363dbddeffef8d73ee3be7b3858fa3.zip | |
; Fix previous commit
The printer otherwise includes the 0x prefix.
* lisp/emacs-lisp/cl-print.el: Add 0x to format.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/cl-print.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cl-print.el b/lisp/emacs-lisp/cl-print.el index cf9407c8a76..6a292d24776 100644 --- a/lisp/emacs-lisp/cl-print.el +++ b/lisp/emacs-lisp/cl-print.el @@ -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)) |