diff options
author | Antoine Ginies <aginies@mandriva.com> | 2005-08-09 09:17:15 +0000 |
---|---|---|
committer | Antoine Ginies <aginies@mandriva.com> | 2005-08-09 09:17:15 +0000 |
commit | 10750b887113dc03041c3be0d246b5b0f601a5de (patch) | |
tree | d2342f51aa30ecc5257bc1a2620e5e5ee236d8d9 | |
parent | 5a8e51ddcd0ad7d8f3c47331c6720777e28e5c34 (diff) | |
download | drakwizard-10750b887113dc03041c3be0d246b5b0f601a5de.tar drakwizard-10750b887113dc03041c3be0d246b5b0f601a5de.tar.gz drakwizard-10750b887113dc03041c3be0d246b5b0f601a5de.tar.bz2 drakwizard-10750b887113dc03041c3be0d246b5b0f601a5de.tar.xz drakwizard-10750b887113dc03041c3be0d246b5b0f601a5de.zip |
split drakwizard (show or not all wizards in optionmenu)
-rwxr-xr-x | drakwizard.pl | 39 |
1 files changed, 22 insertions, 17 deletions
diff --git a/drakwizard.pl b/drakwizard.pl index e90104ed..40a9100c 100755 --- a/drakwizard.pl +++ b/drakwizard.pl @@ -38,24 +38,29 @@ $::Wiz_more_dir = "/etc/wizard.d/"; my $in = interactive->vnew; my %wiz = ( - dhcp => ['Dhcp', N("DHCP server")], - bind => ['Bind', N("DNS server")], - inn => ['Inn', N("News server")], - nfs => ['NFS', N("NFS server")], - postfix => ['Postfix', N("Mail server")], - proftpd => ['Proftpd', N("FTP server")], - samba => ['Samba', N("Samba server")], - sambashare => ['Sambashare', N("Manage Samba share")], - sambaprint => ['Sambaprint', N("Manage Samba print")], - squid => ['Squid', N("Proxy")], - sshd => ['Sshd', N("OpenSSH daemon configuration")], - ntp => ['Ntp', N("Time server")], - apache2 => ['Apache', N("Apache2 web server"), { ver => 2 }], - nisautofs => ['Nisautofs', N("NIS server autofs map")], - installsrv => ['Installsrv', N("Linux Install server")], - ldap => [ 'Ldap', N("ldap server")], - ); + apache2 => ['Apache', N("Apache2 web server"), { ver => 2 }], + samba => ['Samba', N("Samba server")], + sambashare => ['Sambashare', N("Manage Samba share")], + sambaprint => ['Sambaprint', N("Manage Samba print")], + postfix => ['Postfix', N("Mail server")], + ); +# display all wizards +-d "/usr/share/wizards/proxy_wizard" and %wiz = ( + %wiz, + nisautofs => ['Nisautofs', N("NIS server autofs map")], + installsrv => ['Installsrv', N("Linux Install server")], + ldap => [ 'Ldap', N("ldap server")], + squid => ['Squid', N("Proxy")], + sshd => ['Sshd', N("OpenSSH daemon configuration")], + ntp => ['Ntp', N("Time server")], + dhcp => ['Dhcp', N("DHCP server")], + bind => ['Bind', N("DNS server")], + inn => ['Inn', N("News server")], + nfs => ['NFS', N("NFS server")], + proftpd => ['Proftpd', N("FTP server")], + %wiz, + ); foreach my $file (glob_("$::Wiz_more_dir/*.conf")) { |