diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-07-05 15:11:59 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2014-07-05 15:11:59 -0400 |
| commit | b16a9348e471253f67ad4520f013184404c008a1 (patch) | |
| tree | dcb51461f391b4ba703644a5dfef9fd9caa67608 /lisp/emacs-lisp/edebug.el | |
| parent | d66146bf1851fd65a903b1b67b3deee3aba2082e (diff) | |
| download | emacs-b16a9348e471253f67ad4520f013184404c008a1.tar.gz emacs-b16a9348e471253f67ad4520f013184404c008a1.tar.bz2 emacs-b16a9348e471253f67ad4520f013184404c008a1.zip | |
* lisp/emacs-lisp/edebug.el (edebug-eval-defun): Print result using
proper Lisp quoting.
Fixes: debbugs:17934
Diffstat (limited to 'lisp/emacs-lisp/edebug.el')
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index e2d38ffe858..892fa7f2d37 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -497,7 +497,7 @@ the minibuffer." (setq edebug-result (eval (eval-sexp-add-defvars form) lexical-binding)) (if (not edebugging) (prog1 - (princ edebug-result) + (prin1 edebug-result) (let ((str (eval-expression-print-format edebug-result))) (if str (princ str)))) edebug-result))) |