From d84fcaa76cd75a583763f55cc32e34d1a6c7b330 Mon Sep 17 00:00:00 2001
From: Stefan Metzmacher <metze@samba.org>
Date: Thu, 12 Apr 2007 12:45:41 +0000
Subject: r22197: fix formating

metze
(This used to be commit 31c9bd4bf2e08a979c7396a56b7bdb124bebfd01)
---
 source4/script/tests/Samba4.pm   |  4 ++--
 source4/script/tests/selftest.pl | 18 ++++++++----------
 2 files changed, 10 insertions(+), 12 deletions(-)

(limited to 'source4/script')

diff --git a/source4/script/tests/Samba4.pm b/source4/script/tests/Samba4.pm
index 95eaf7f67e..b891b4dc7b 100644
--- a/source4/script/tests/Samba4.pm
+++ b/source4/script/tests/Samba4.pm
@@ -18,7 +18,7 @@ sub new($$$$) {
 
 sub slapd_start($$)
 {
-    my $count = 0;
+	my $count = 0;
 	my ($self, $env_vars) = @_;
 
 	my $conf = $env_vars->{SLAPD_CONF};
@@ -172,7 +172,7 @@ sub provision_dc($$)
 sub provision_ldap($$)
 {
 	my ($self, $envvars) = @_;
-    system("$self->{bindir}/smbscript $self->{setupdir}/provision $envvars->{PROVISION_OPTIONS} \"$envvars->{PROVISION_ACI}\" --ldap-backend=$envvars->{LDAP_URI}") and
+	system("$self->{bindir}/smbscript $self->{setupdir}/provision $envvars->{PROVISION_OPTIONS} \"$envvars->{PROVISION_ACI}\" --ldap-backend=$envvars->{LDAP_URI}") and
 		die("LDAP PROVISIONING failed: $self->{bindir}/smbscript $self->{setupdir}/provision $envvars->{PROVISION_OPTIONS} \"$envvars->{PROVISION_ACI}\" --ldap-backend=$envvars->{LDAP_URI}");
 }
 
diff --git a/source4/script/tests/selftest.pl b/source4/script/tests/selftest.pl
index 2c9f625600..fa4de4dde4 100755
--- a/source4/script/tests/selftest.pl
+++ b/source4/script/tests/selftest.pl
@@ -321,7 +321,7 @@ Behaviour:
 }
 
 my $result = GetOptions (
-	    'help|h|?' => \$opt_help,
+		'help|h|?' => \$opt_help,
 		'target=s' => \$opt_target,
 		'prefix=s' => \$prefix,
 		'socket-wrapper' => \$opt_socket_wrapper,
@@ -349,7 +349,7 @@ my $tests = shift;
 # quick hack to disable rpc validation when using valgrind - its way too slow
 unless (defined($ENV{VALGRIND})) {
 	$ENV{VALIDATE} = "validate";
-    $ENV{MALLOC_CHECK_} = 2;
+	$ENV{MALLOC_CHECK_} = 2;
 }
 
 my $old_pwd = "$RealBin/../..";
@@ -434,11 +434,11 @@ if (defined($opt_skip)) {
 }
 
 my $interfaces = join(',', ("127.0.0.6/8", 
-		                 "127.0.0.7/8",
-						 "127.0.0.8/8",
-						 "127.0.0.9/8",
-						 "127.0.0.10/8",
-						 "127.0.0.11/8"));
+			    "127.0.0.7/8",
+			    "127.0.0.8/8",
+			    "127.0.0.9/8",
+			    "127.0.0.10/8",
+			    "127.0.0.11/8"));
 
 my $conffile = "$prefix/client.conf";
 
@@ -463,9 +463,7 @@ sub write_clientconf($$)
 	} else {
 		print CF "\ticonv:native = false\n";
 	}
-	print CF 
-"	netbios name = client
-";
+	print CF "\tnetbios name = client\n";
 	if (defined($vars->{DOMAIN})) {
 		print CF "\tworkgroup = $vars->{DOMAIN}\n";
 	}
-- 
cgit