X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FORTestTiedRemote.pm;h=b3b88ecc0ed00bee763733eb01c1001dd22bbbe2;hb=c5133f85c8c09b6c705bfaf172c43b689020da81;hp=e859b06a4700533cd260a9f65a5bee76d41d563e;hpb=f129bfaf05b1ae0e2e2992cad47a70482dec9885;p=scpubgit%2FObject-Remote.git

diff --git a/t/lib/ORTestTiedRemote.pm b/t/lib/ORTestTiedRemote.pm
index e859b06..b3b88ec 100644
--- 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;