diff options
author | Nicolas Vigier <nvigier@mandriva.com> | 2008-02-19 14:01:45 +0000 |
---|---|---|
committer | Nicolas Vigier <nvigier@mandriva.com> | 2008-02-19 14:01:45 +0000 |
commit | 91208328821a6050ce7d6f316470b33c9a5ae401 (patch) | |
tree | 0bc051b32090c8bc37e11d83d380f0a24c600c58 /samba_wizard/Samba.pm | |
parent | 6cbb36b56d99fcee921a2fd35609bf425758a25c (diff) | |
download | drakwizard-91208328821a6050ce7d6f316470b33c9a5ae401.tar drakwizard-91208328821a6050ce7d6f316470b33c9a5ae401.tar.gz drakwizard-91208328821a6050ce7d6f316470b33c9a5ae401.tar.bz2 drakwizard-91208328821a6050ce7d6f316470b33c9a5ae401.tar.xz drakwizard-91208328821a6050ce7d6f316470b33c9a5ae401.zip |
fix bug #36616
Diffstat (limited to 'samba_wizard/Samba.pm')
-rwxr-xr-x | samba_wizard/Samba.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/samba_wizard/Samba.pm b/samba_wizard/Samba.pm index d057f9b1..d845812d 100755 --- a/samba_wizard/Samba.pm +++ b/samba_wizard/Samba.pm @@ -66,7 +66,11 @@ my $o = { wiz_sambatype => '', }, init => sub { - test_host_domain($SHORTHOSTNAME, $DOMAINNAME); + my ($err, $msg) = test_host_domain($SHORTHOSTNAME, $DOMAINNAME); + if (!$err) { + $in->ask_warn(N('Error'), $msg); + die 'wizcancel'; + } }, needed_rpm => [ 'samba-server' ], defaultimage => "/usr/share/wizards/samba_wizard/images/sambasrv.png", |