diff options
Diffstat (limited to 'perl-install/standalone/drakperm')
-rwxr-xr-x | perl-install/standalone/drakperm | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/perl-install/standalone/drakperm b/perl-install/standalone/drakperm index 7b7e56cc2..234228edb 100755 --- a/perl-install/standalone/drakperm +++ b/perl-install/standalone/drakperm @@ -6,16 +6,7 @@ use lib qw(/usr/lib/libDrakX); use standalone; use common; -BEGIN { - eval { - require ugtk2; - ugtk2->import(qw(:helpers :wrappers :create)); - }; - if ($@) { - print "This program cannot be run in console mode.\n"; - c::_exit(0); #- skip ugtk2::END - } -} +use ugtk2 qw(:helpers :wrappers :create); require_root_capability(); local $_ = join '', @ARGV; |