fix incorrect indentation

[scpubgit/Object-Remote.git] / t / lib / ORTestTiedRemote.pm

diff --git a/t/lib/ORTestTiedRemote.pm b/t/lib/ORTestTiedRemote.pm
index e859b06..b3b88ec 100644 (file)
--- a/t/lib/ORTestTiedRemote.pm
+++ b/t/lib/ORTestTiedRemote.pm
@@ -9,37 +9,37 @@ has hash => ( is => 'ro',  builder => 1 );
 has array => ( is => 'ro', builder => 1 );
 
 sub _build_hash {
-    tie(my %hash, 'Tie::StdHash');
-    %hash = ( akey => 'a value');
-    return \%hash;
+  tie(my %hash, 'Tie::StdHash');
+  %hash = ( akey => 'a value');
+  return \%hash;
 } 
 
 sub _build_array {
-    tie(my @array, 'Tie::StdArray');
-    @array = ('another value');
-    return \@array;
+  tie(my @array, 'Tie::StdArray');
+  @array = ('another value');
+  return \@array;
 }
 
 sub sum_array {
-    my ($self) = @_;
-    my $sum = 0;
+  my ($self) = @_;
+  my $sum = 0;
     
-    foreach(@{$self->array}) {
-        $sum += $_;
-    }  
+  foreach(@{$self->array}) {
+    $sum += $_;
+  }  
     
-    return $sum; 
+  return $sum; 
 }
 
 sub sum_hash {
-    my ($self) = @_; 
-    my $sum = 0;
+  my ($self) = @_; 
+  my $sum = 0;
     
-    foreach(values(%{$self->hash})) {
-        $sum += $_;
-    }
+  foreach(values(%{$self->hash})) {
+    $sum += $_;
+  }
     
-    return $sum; 
+  return $sum; 
 }
 
 1;