diff options
| author | Antoine Ginies <aginies@mandriva.com> | 2005-08-29 15:27:48 +0000 |
|---|---|---|
| committer | Antoine Ginies <aginies@mandriva.com> | 2005-08-29 15:27:48 +0000 |
| commit | 00e85ed40cd6fdf92cf0dcb54fe45450a04b440e (patch) | |
| tree | ccb59d3403b00ebc4080e9434f8c1d87944d0b4e | |
| parent | 032dcddb3295c973762c26b639ed6ff195900655 (diff) | |
| download | drakwizard-00e85ed40cd6fdf92cf0dcb54fe45450a04b440e.tar drakwizard-00e85ed40cd6fdf92cf0dcb54fe45450a04b440e.tar.gz drakwizard-00e85ed40cd6fdf92cf0dcb54fe45450a04b440e.tar.bz2 drakwizard-00e85ed40cd6fdf92cf0dcb54fe45450a04b440e.tar.xz drakwizard-00e85ed40cd6fdf92cf0dcb54fe45450a04b440e.zip | |
fix ok_cancel next_back error
| -rwxr-xr-x | samba_wizard/Samba.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/samba_wizard/Samba.pm b/samba_wizard/Samba.pm index 02ed73e1..cae13a74 100755 --- a/samba_wizard/Samba.pm +++ b/samba_wizard/Samba.pm @@ -95,14 +95,14 @@ $o->{pages} = { no_back => 1, pre => sub { if (-f $wiz_samba_etc) { - $::in->ask_warn(N("Information"), N("It seems you previously setup a Samba server. This wizard will re-read your old configuration, and show you the Samba server type you choose")); +# $::isWizard = 1; + $::in->ask_warn(N("Information"), N("It seems you previously setup a Samba server. This wizard will re-read your old configuration, and show you the Samba server type you choose")) and return; my $data = cat_($wiz_samba_etc); # detect old Samba type my ($old_type) = $data =~ /type=(\d)/; $o->{var}{wiz_type} = chomp_($old_type); } else { $o->{var}{wiz_type} = 2 } }, - next => 'ask_type', post => sub { if ($o->{var}{wiz_type} == 2) { return 'pdc' } |