diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-03-19 23:53:45 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-03-19 23:53:45 -0400 |
commit | bf02cb227d98626c3dff61c69fa8b4ce523d71bd (patch) | |
tree | 084efda653c89fc6dcef96f46a0f1abd54380102 /lisp/emacs-lisp | |
parent | 414dbb000dcd62c4f252b5f73f9847340de40396 (diff) | |
download | emacs-bf02cb227d98626c3dff61c69fa8b4ce523d71bd.tar.gz emacs-bf02cb227d98626c3dff61c69fa8b4ce523d71bd.tar.bz2 emacs-bf02cb227d98626c3dff61c69fa8b4ce523d71bd.zip |
* lisp/emacs-lisp/debug.el (debugger-setup-buffer): Revert local change to
print depth and length.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/debug.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index 0bdab919434..88633eaaa46 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -269,10 +269,8 @@ That buffer should be current already." (setq buffer-undo-list t) (let ((standard-output (current-buffer)) (print-escape-newlines t) - (print-quoted t) ;Doesn't seem to work :-( - (print-level 1000) ;8 - ;; (print-length 50) - ) + (print-level 8) + (print-length 50)) (backtrace)) (goto-char (point-min)) (delete-region (point) |