summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2011-03-19 23:53:45 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2011-03-19 23:53:45 -0400
commitbf02cb227d98626c3dff61c69fa8b4ce523d71bd (patch)
tree084efda653c89fc6dcef96f46a0f1abd54380102 /lisp/emacs-lisp
parent414dbb000dcd62c4f252b5f73f9847340de40396 (diff)
downloademacs-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.el6
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)