From 89091c448af9d6a4bc30af8947376418af9f7a41 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Wed, 17 Oct 2012 16:54:47 +0000
Subject: perl_checker cleanups

---
 dns_wizard/Bind.pm | 20 +++++++++++++-------
 1 file changed, 13 insertions(+), 7 deletions(-)

diff --git a/dns_wizard/Bind.pm b/dns_wizard/Bind.pm
index 29e2d766..d17570de 100644
--- a/dns_wizard/Bind.pm
+++ b/dns_wizard/Bind.pm
@@ -72,7 +72,7 @@ my $o = {
 	     $in->ask_warn(N('Error'), $msg);
 	     die 'wizcancel';
 	   }
-	   ($err, $msg)
+	   ($err, $msg);
 	 },
 	 needed_rpm => [ 'bind' ],
 	 defaultimage => "/usr/share/mcc/themes/default/dns_server-mdk.png",
@@ -142,7 +142,9 @@ $o->{pages} = {
 				       if (!is_ip($o->{var}{CLIENTIP})) {
 					   #$in->ask_warn(N('Error'), N('This is not a valid IP address.')); 
 					   return 1;
-				       } else { return 0; }
+				       } else {
+					   return 0;
+				       }
 				   }
 			       },
 			   no_back => 1,
@@ -166,7 +168,9 @@ $o->{pages} = {
 				     if (!is_ip($o->{var}{IPMASTER})) {
 					 #$in->ask_warn(N('Error'), N('This is not a valid IP address.')); 
 					 return 1;
-				     } else { return 0; }
+				     } else { 
+					 return 0;
+				     }
 				 }
 			     },
 			 no_back => 1,
@@ -187,7 +191,9 @@ $o->{pages} = {
 					 if (!is_ip($o->{var}{IPOFFORWARDER})) {
 					     #$in->ask_warn(N('Error'), N('This is not a valid IP address for your forwarder.')); 
 					     return 1;
-					 } else { return 0; }
+					 } else {
+					     return 0;
+					 }
 				     }
 				 },
                              no_back => 1,
@@ -818,9 +824,9 @@ sub end_it {
   copy_good();
   # start or restart the service
   if (services::is_service_running('named')) {
-    services::restart('named')
+      services::restart('named');
     } else {
-      services::start('named')
+	services::start('named');
     }
 }
 
@@ -887,7 +893,7 @@ sub do_it_add {
   }
   increment_serial($iprev);
   system("service named reload");
-  return 'endadd'
+  return 'endadd';
 }
 
 sub do_it_remove {
-- 
cgit v1.2.1