From 679dfd84cc5213c8387e5a2952832fb8fa787a2b Mon Sep 17 00:00:00 2001 From: damien Date: Wed, 12 Sep 2001 10:57:01 +0000 Subject: corrected wizard mode in newt mode --- perl-install/standalone/draknet | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/standalone/draknet') diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet index bfc70118a..1ddca557b 100755 --- a/perl-install/standalone/draknet +++ b/perl-install/standalone/draknet @@ -38,9 +38,6 @@ my $xpm_path="/usr/share/libDrakX/pixmaps"; $::isEmbedded = ($::XID, $::CCPID) = "@ARGV" =~ /--embedded (\w+) (\w+)/; $::isWizard = "@ARGV" =~ /--wizard/; $::expert = "@ARGV" =~ /--expert/; -$::isEmbedded or $::isWizard=1; -$::Wizard_pix_up = "wiz_draknet.png"; -$::Wizard_title = "Network & Internet Configuration"; local $_ = join '', @ARGV; #/-h/ and die "usage: draknet[--xf3] [--beginner] [--expert] [--auto] [--noauto] [--skiptest] [--testing]\n"; @@ -53,6 +50,9 @@ my @conx_type = ('modem', 'isdn_internal', 'isdn_external', 'adsl', 'cable', 'la #$::wizard_xpm = "/usr/share/pixmaps/internet.xpm"; my $in = 'interactive'->vnew('su', 'network'); +!$::isEmbedded && $in->isa('interactive_gtk') and $::isWizard=1; +$::Wizard_pix_up = "wiz_draknet.png"; +$::Wizard_title = "Network & Internet Configuration"; MDK::Common::Globals::init( in => $in, -- cgit v1.2.1