From 9360e108248c60fc2142ca5ab5a76d62c835e86f Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 19 Jul 2002 12:37:22 +0000 Subject: rename $i in $X (to have the same as Xconfigurator.pm) --- perl-install/standalone/XFdrake | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'perl-install/standalone/XFdrake') diff --git a/perl-install/standalone/XFdrake b/perl-install/standalone/XFdrake index 5ef974b29..f6584fad8 100755 --- a/perl-install/standalone/XFdrake +++ b/perl-install/standalone/XFdrake @@ -33,7 +33,7 @@ local $_ = join '', @ARGV; /-h/ and die "usage: XFdrake [--xf3] [--beginner] [--expert] [--auto] [--noauto] [--skiptest] [--testing]\n"; -my $i = {}; +my $X = {}; $::force_xf3 = /-xf3/; $::beginner = /-beginner/; @@ -41,7 +41,7 @@ $::expert = /-expert/; $::auto = /-auto/; $::noauto = /-noauto/; $::testing = /-testing/; -$i->{skiptest} = /-skiptest/; +$X->{skiptest} = /-skiptest/; my $in = 'interactive'->vnew('su', 'X'); @@ -51,13 +51,13 @@ my $f = "/usr/X11R6/lib/X11/rgb.txt"; #- this one is on all platform (instead of $in->do_pkgs->install('XFree86', 'XFree86-75dpi-fonts') if !-e $f; -e $f or die "install XFree86 first!\n"; -`pidof xfs` > 0 or system("/etc/rc.d/init.d/xfs start") if !$i->{skiptest}; +`pidof xfs` > 0 or system("/etc/rc.d/init.d/xfs start") if !$X->{skiptest}; system("mount /proc 2>/dev/null"); # ensure /proc is mounted for pci probing begin: -Xconfig::getinfo($i); -Xconfig::getinfoFromXF86Config($i); #- take default from here at least. +Xconfig::getinfo($X); +Xconfig::getinfoFromXF86Config($X); #- take default from here at least. my $allowNVIDIA_rpms; { @@ -93,7 +93,7 @@ my $allowNVIDIA_rpms; } $::isEmbedded and kill USR2, $::CCPID; -Xconfigurator::main($i, $in, $in->do_pkgs, +Xconfigurator::main($X, $in, $in->do_pkgs, { allowFB => $::expert, allowNVIDIA_rpms => $allowNVIDIA_rpms }); !$::isEmbedded and $in->exit(0); -- cgit v1.2.1