force BDC to use an LDAP backend

1 files changed, 4 insertions, 4 deletions

diff --git a/samba_wizard/Samba.pm b/samba_wizard/Samba.pm
index d9cb56a1..9e566088 100755
--- a/samba_wizard/Samba.pm
+++ b/samba_wizard/Samba.pm
@@ -80,7 +80,7 @@ use Data::Dumper;
 print Dumper($samba);
 
 my %type = (
-	    1 => N('BDC - backup domain controller'),
+	    1 => N('BDC - backup domain controller (need PDC+LDAP)'),
 	    2 => N('PDC - primary domain controller'),
 	    3 => N('Standalone - standalone server'),
 	    4 => N('Member - member of a domain'),
@@ -91,7 +91,7 @@ my @loglevel = qw(0 1 2 3 4 5 6 7 8 9);
 
 $o->{pages} = {
 	       welcome => {
-			   name => N('Samba Configuration Wizard') . "\n\n" . N('Samba allows your server to behave as a file and print server for workstations running non-Linux systems.') . "\n\n" . N('PDC: primary domain controller') . "\n" . N('BDC: backup domain controller') . "\n" . N('standalone: standalone server') . "\n" . N('Member: member of a domain'),
+			   name => N('Samba server configuration Wizard') . "\n\n" . N('Samba allows your server to behave as a file and print server for workstations running non-Linux systems.'),
 			   no_back => 1,
                            pre => sub {
 			     if (-f $wiz_samba_etc) {
@@ -114,7 +114,7 @@ $o->{pages} = {
 			       return 'member' }
                            },
                            data => [
-                                   { label => N("Wich type of Samba server do you you want:") . " ", val => \$o->{var}{wiz_type}, type => 'list', list => [ keys %type ], format => sub { $type{$_[0]} } },
+                                   { label => "", val => \$o->{var}{wiz_type}, type => 'list', list => [ keys %type ], format => sub { $type{$_[0]} } },
                                    ],
                           },
 	       pdc => {
@@ -195,7 +195,7 @@ $o->{pages} = {
 				     { label => N('Domain logons'), fixed_val => \$o->{var}{wiz_domain_logons} },
 				     { label => N('admin users:'), val => \$o->{var}{wiz_admin_users}, help => N('root @adm') },
 				    ],
-			    next => 'ask_workgroup',
+			    next => 'ldap_conf',
 			   },
 	       member => {
 			  name => N('Member of a domain') . "\n\n" . ('Share data, users home or printers.') . "\n" . N('Please enter the domain you want to join.'),