From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: BT Templeton Newsgroups: gmane.lisp.guile.devel Subject: [PATCH] set width for `,trace' command Date: Fri, 22 Jul 2011 11:35:30 -0400 Message-ID: <87livq8h19.fsf@olor.terpri.org> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: dough.gmane.org 1311348956 28750 80.91.229.12 (22 Jul 2011 15:35:56 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Fri, 22 Jul 2011 15:35:56 +0000 (UTC) To: guile-devel@gnu.org Original-X-From: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Fri Jul 22 17:35:53 2011 Return-path: Envelope-to: guile-devel@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1QkHlW-00083p-UZ for guile-devel@m.gmane.org; Fri, 22 Jul 2011 17:35:51 +0200 Original-Received: from localhost ([::1]:37787 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QkHlW-0006Rr-Hu for guile-devel@m.gmane.org; Fri, 22 Jul 2011 11:35:50 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:52465) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QkHlT-0006Rm-2i for guile-devel@gnu.org; Fri, 22 Jul 2011 11:35:47 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QkHlS-0004nB-2p for guile-devel@gnu.org; Fri, 22 Jul 2011 11:35:47 -0400 Original-Received: from lo.gmane.org ([80.91.229.12]:43694) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QkHlR-0004n3-Sn for guile-devel@gnu.org; Fri, 22 Jul 2011 11:35:46 -0400 Original-Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1QkHlP-00080t-72 for guile-devel@gnu.org; Fri, 22 Jul 2011 17:35:43 +0200 Original-Received: from nc-184-3-104-15.dhcp.embarqhsd.net ([184.3.104.15]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Fri, 22 Jul 2011 17:35:43 +0200 Original-Received: from bpt by nc-184-3-104-15.dhcp.embarqhsd.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Fri, 22 Jul 2011 17:35:43 +0200 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 21 Original-X-Complaints-To: usenet@dough.gmane.org X-Gmane-NNTP-Posting-Host: nc-184-3-104-15.dhcp.embarqhsd.net User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) Cancel-Lock: sha1:n6l2TLCInKmkgarpU6aCBRr66SY= X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-Received-From: 80.91.229.12 X-BeenThere: guile-devel@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: "Developers list for Guile, the GNU extensibility library" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Original-Sender: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.devel:12674 Archived-At: * module/system/repl/command.scm (trace): Set trace width to terminal width by default. --- module/system/repl/command.scm | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/module/system/repl/command.scm b/module/system/repl/command.scm index a2f2a6f..98325cb 100644 --- a/module/system/repl/command.scm +++ b/module/system/repl/command.scm @@ -514,7 +514,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))) ;;; -- 1.7.5.4