diff options
author | damien <damien@mandriva.com> | 2000-08-22 17:36:27 +0000 |
---|---|---|
committer | damien <damien@mandriva.com> | 2000-08-22 17:36:27 +0000 |
commit | 71b49d1a41df428ef08c9159db9e2154d3ec29b5 (patch) | |
tree | 4b2734b79c162b01e66ceca3e648d618d43e23e4 /perl-install/standalone/draknet | |
parent | b19b34a08590f33973ffc9449accc21cdb1adbba (diff) | |
download | drakx-backup-do-not-use-71b49d1a41df428ef08c9159db9e2154d3ec29b5.tar drakx-backup-do-not-use-71b49d1a41df428ef08c9159db9e2154d3ec29b5.tar.gz drakx-backup-do-not-use-71b49d1a41df428ef08c9159db9e2154d3ec29b5.tar.bz2 drakx-backup-do-not-use-71b49d1a41df428ef08c9159db9e2154d3ec29b5.tar.xz drakx-backup-do-not-use-71b49d1a41df428ef08c9159db9e2154d3ec29b5.zip |
moved drakfuck to dracknet.
improved isdn config.
Diffstat (limited to 'perl-install/standalone/draknet')
-rwxr-xr-x | perl-install/standalone/draknet | 63 |
1 files changed, 63 insertions, 0 deletions
diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet new file mode 100755 index 000000000..d34342dec --- /dev/null +++ b/perl-install/standalone/draknet @@ -0,0 +1,63 @@ +#!/usr/bin/perl + +#- CHANGE THIS! (dam's) +# DrakFuck + +# 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 Xconfig; +use c; + +local $_ = join '', @ARGV; + +#/-h/ and die "usage: DrakFuck[--xf3] [--beginner] [--expert] [--auto] [--noauto] [--skiptest] [--testing]\n"; + +my $i = {}; + +$::isStandalone = 1; +#$::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'); + +#`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; +#Xconfig::getinfo($i); + +#Xconfigurator::main('', $i, $in, 0, -e "/etc/pcmcia", sub { system("urpmi --auto XFree86-$_[0]") }); + +#netconnect::isdn_ask('', $i, $in, -e "/etc/pcmcia"); +netconnect::isdn_detect('', $i, $in, -e "/etc/pcmcia"); +#netconnect::isdn_write_config('', $i, $in, -e "/etc/pcmcia"); + +$in->exit(0); |