diff options
Diffstat (limited to 'perl-install/standalone/logdrake')
-rwxr-xr-x | perl-install/standalone/logdrake | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake index 541d97a58..edc84a591 100755 --- a/perl-install/standalone/logdrake +++ b/perl-install/standalone/logdrake @@ -26,16 +26,7 @@ use lib qw(/usr/lib/libDrakX); use standalone; #- warning, standalone must be loaded very first, for 'explanations' use common; use interactive; -BEGIN { - eval { - require ugtk2; - ugtk2->import(qw(:create :dialogs :helpers :wrappers)); - }; - if ($@) { - print "This program cannot be run in console mode.\n"; - c::_exit(0); #- skip ugtk2::END - } -} +use ugtk2 qw(:create :dialogs :helpers :wrappers); use vars qw(*F); my $in = 'interactive'->vnew('su'); |