diff options
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", |