diff options
Diffstat (limited to 'perl-install/standalone/draknet')
| -rwxr-xr-x | perl-install/standalone/draknet | 56 |
1 files changed, 0 insertions, 56 deletions
diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet deleted file mode 100755 index 38194c3dd..000000000 --- a/perl-install/standalone/draknet +++ /dev/null @@ -1,56 +0,0 @@ -#!/usr/bin/perl - -# DrakNet - -# Copyright (C) 1999 MandrakeSoft (damien@mandrakesoft.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 netconnect; -use c; - -local $_ = join '', @ARGV; - -#/-h/ and die "usage: draknet[--xf3] [--beginner] [--expert] [--auto] [--noauto] [--skiptest] [--testing]\n"; - -my $netcnx = {}; - -$::isStandalone = 1; -$::isWizard = 0; -$::wizard_xpm = "/usr/share/pixmaps/internet.xpm"; -#$::force_xf3 = /-xf3/; -#$::beginner = /-beginner/; -#$::expert = /-expert/; -#$::auto = /-auto/; -#$::noauto = /-noauto/; -#$::testing = /-testing/; -#$i->{skiptest} = /-skiptest/; - -#my $f = "/usr/X11R6/lib/X11/Cards"; -#-e $f or system("urpmi --auto XFree86 XFree86-75dpi-fonts"); -#-e $f or die "install XFree86 first!\n"; - -my $in = vnew interactive('su'); - -$::isStandalone and my $wait=$in->wait_message('', "", 1); -netconnect::intro('', $netcnx, $in, -e "/etc/pcmcia", sub { - $in->suspend; - system("urpmi --auto --best-output " . join(' ', @_)); - $in->resume; - }); -$in->exit(0); |
