diff options
Diffstat (limited to 'perl-install/standalone/XFdrake')
| -rwxr-xr-x | perl-install/standalone/XFdrake | 64 |
1 files changed, 0 insertions, 64 deletions
diff --git a/perl-install/standalone/XFdrake b/perl-install/standalone/XFdrake deleted file mode 100755 index a4b4145e1..000000000 --- a/perl-install/standalone/XFdrake +++ /dev/null @@ -1,64 +0,0 @@ -#!/usr/bin/perl - -# XFdrake -# Copyright (C) 1999 MandrakeSoft (pixel@linux-mandrake.com) -# -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. - -use lib qw(/usr/lib/libDrakX); - -use interactive; -use standalone; -use Xconfigurator; -use Xconfig; -use c; - -$::isEmbedded = ($::XID, $::CCPID) = "@ARGV" =~ /--embedded (\w+) (\w+)/; - -local $_ = join '', @ARGV; - -/-h/ and die "usage: XFdrake [--xf3] [--beginner] [--expert] [--auto] [--noauto] [--skiptest] [--testing]\n"; - -my $i = {}; - -$::force_xf3 = /-xf3/; -$::beginner = /-beginner/; -$::expert = /-expert/; -$::auto = /-auto/; -$::noauto = /-noauto/; -$::testing = /-testing/; -$i->{skiptest} = /-skiptest/; - -my $in = interactive->vnew('su'); - -my $f = "/usr/X11R6/lib/X11/Cards"; -$in->standalone::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"); - -system("mount /proc 2>/dev/null"); # ensure /proc is mounted for pci probing - -Xconfig::getinfoFromXF86Config($i) if $0 =~ Xdrakres; - -begin: -Xconfig::getinfo($i); -Xconfig::getinfoFromXF86Config($i, ''); #- take default from here at least. - -$::isEmbedded and kill USR2, $::CCPID; -Xconfigurator::main('', $i, $in, 0, sub { $in->standalone::pkgs_install(@_) }); -!$::isEmbedded and $in->exit(0); -kill USR1, $::CCPID; -goto begin; |
