From 91208328821a6050ce7d6f316470b33c9a5ae401 Mon Sep 17 00:00:00 2001 From: Nicolas Vigier Date: Tue, 19 Feb 2008 14:01:45 +0000 Subject: fix bug #36616 --- dns_wizard/Bind.pm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'dns_wizard') diff --git a/dns_wizard/Bind.pm b/dns_wizard/Bind.pm index 66e15102..c8c5ecd4 100644 --- a/dns_wizard/Bind.pm +++ b/dns_wizard/Bind.pm @@ -67,7 +67,11 @@ my $o = { CLIENTIP => $CLIENTIP, }, 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 => [ 'bind' ], defaultimage => "/usr/share/mcc/themes/default/dns_server-mdk.png", -- cgit v1.2.1