diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 1999-12-09 00:52:32 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 1999-12-09 00:52:32 +0000 |
| commit | d59b27d5fcc346d96072ed0edb88cda0223be084 (patch) | |
| tree | f605bc19591d3cf23d372a5ace6c70fbe367a620 /perl-install/interactive_newt.pm | |
| parent | 1934b3123c81c2ccb425626aa61ed29e38780ddf (diff) | |
| download | drakx-d59b27d5fcc346d96072ed0edb88cda0223be084.tar drakx-d59b27d5fcc346d96072ed0edb88cda0223be084.tar.gz drakx-d59b27d5fcc346d96072ed0edb88cda0223be084.tar.bz2 drakx-d59b27d5fcc346d96072ed0edb88cda0223be084.tar.xz drakx-d59b27d5fcc346d96072ed0edb88cda0223be084.zip | |
no_comment
Diffstat (limited to 'perl-install/interactive_newt.pm')
| -rw-r--r-- | perl-install/interactive_newt.pm | 2 |
1 files changed, 2 insertions, 0 deletions
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 { |