mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 05:50:26 +02:00
Code Activity

set width for `,trace' command

Browse source 
* module/system/repl/command.scm (trace): Set trace width to terminal
  width by default.
This commit is contained in:
BT Templeton 2011-07-22 11:35:30 -04:00 • committed by Ludovic Courtès
parent 13d807b7d3
commit 74e4dd2798
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/system/repl/command.scm
View file

@ -529,7 +529,7 @@ Trace execution."
;; FIXME: doc options, or somehow deal with them better
(apply call-with-trace
(repl-prepare-eval-thunk repl (repl-parse repl form))
opts))
(cons* #:width (terminal-width) opts)))
;;;