From d59b27d5fcc346d96072ed0edb88cda0223be084 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 9 Dec 1999 00:52:32 +0000 Subject: no_comment --- perl-install/interactive_newt.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'perl-install/interactive_newt.pm') diff --git a/perl-install/interactive_newt.pm b/perl-install/interactive_newt.pm index 729453c60..5094efe13 100644 --- a/perl-install/interactive_newt.pm +++ b/perl-install/interactive_newt.pm @@ -20,10 +20,12 @@ sub new() { Newt::changeColors; Newt::Cls; Newt::SetSuspendCallback; + open STDERR,">/dev/null"; bless {}, $_[0]; } sub end() { Newt::Finished } +sub exit() { end; exit($_[0]) } END { end() } sub myTextbox { -- cgit v1.2.1