From 810f8dc9d31e9377231b6cf174fd0415121b1a8e Mon Sep 17 00:00:00 2001
From: Eric Bollengier <eric@eb.homelinux.org>
Date: Mon, 15 Jan 2007 17:22:52 +0000
Subject: [PATCH] ebl  fix bug when bconsole command is > $COLUMNS

git-svn-id: https://bacula.svn.sourceforge.net/svnroot/bacula/trunk@4000 91ce42f0-d328-0410-95d8-f526ca767f89
---
 gui/bweb/lib/Bconsole.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/gui/bweb/lib/Bconsole.pm b/gui/bweb/lib/Bconsole.pm
index 9379657ce9..739f6cdb7f 100644
--- a/gui/bweb/lib/Bconsole.pm
+++ b/gui/bweb/lib/Bconsole.pm
@@ -147,7 +147,10 @@ sub connect
 	{ 
 	    my $sav = $SIG{__DIE__};
 	    $SIG{__DIE__} = sub {  _exit 1 ;};
+            my $old = $ENV{COLUMNS};
+            $ENV{COLUMNS} = 300;
 	    $ret = $self->{bconsole}->spawn(@cmd) ;
+            $ENV{COLUMNS} = $old;
 	    $SIG{__DIE__} = $sav;
 	}
 
-- 
2.39.5