summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakfont
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-05-15 14:45:57 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-05-15 14:45:57 +0000
commit16c876785ea04c33c5656b7fcfc8958f4b379dc4 (patch)
tree98ec02215036d044aa045142a6a3344ae786362a /perl-install/standalone/drakfont
parentf428a9ecda87cfcbb1877e08b25448b4577159b9 (diff)
downloaddrakx-backup-do-not-use-16c876785ea04c33c5656b7fcfc8958f4b379dc4.tar
drakx-backup-do-not-use-16c876785ea04c33c5656b7fcfc8958f4b379dc4.tar.gz
drakx-backup-do-not-use-16c876785ea04c33c5656b7fcfc8958f4b379dc4.tar.bz2
drakx-backup-do-not-use-16c876785ea04c33c5656b7fcfc8958f4b379dc4.tar.xz
drakx-backup-do-not-use-16c876785ea04c33c5656b7fcfc8958f4b379dc4.zip
do not use interactive to get root capabilties, directly use
require_root_capability()
Diffstat (limited to 'perl-install/standalone/drakfont')
-rwxr-xr-xperl-install/standalone/drakfont3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index 8790a9884..d3f12dcc0 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -87,11 +87,10 @@ use lib qw(/usr/lib/libDrakX);
use standalone; #- warning, standalone must be loaded very first, for 'explanations'
-use interactive;
use ugtk2 qw(:helpers :wrappers :create);
use common;
-my $in = 'interactive'->vnew('su');
+require_root_capability();
# global variables needed by each functions
my $xlsfonts = 0;