diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-07-01 00:13:52 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-07-01 00:13:52 +0000 |
commit | 7c55459f9d70d9ceaa300cf869185b531cc9c30e (patch) | |
tree | 33fe5fb6f4c6801c9245c69e63698919a39cd064 /perl-install/standalone/harddrake2 | |
parent | 17f55e9df711f3c56296fa2dc92783931e2214de (diff) | |
download | drakx-7c55459f9d70d9ceaa300cf869185b531cc9c30e.tar drakx-7c55459f9d70d9ceaa300cf869185b531cc9c30e.tar.gz drakx-7c55459f9d70d9ceaa300cf869185b531cc9c30e.tar.bz2 drakx-7c55459f9d70d9ceaa300cf869185b531cc9c30e.tar.xz drakx-7c55459f9d70d9ceaa300cf869185b531cc9c30e.zip |
revert ugly code printing "This program cannot be run in console mode",
it is easily done in ugtk2.pm
Diffstat (limited to 'perl-install/standalone/harddrake2')
-rwxr-xr-x | perl-install/standalone/harddrake2 | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 74e98b563..d6822b1cd 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -6,16 +6,7 @@ use lib qw(/usr/lib/libDrakX); use standalone; use common; -BEGIN { - eval { - require ugtk2; - ugtk2->import(qw(:create :helpers :wrappers)); - }; - if ($@) { - print "This program cannot be run in console mode.\n"; - c::_exit(0); #- skip ugtk2::END - } -} +use ugtk2 qw(:create :helpers :wrappers); use interactive; use harddrake::data; #- needs to stay after use-ugtk2 as long as this module defines globals containing some N() use POSIX qw(:sys_wait_h); |