X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=scpubgit%2FObject-Remote.git;a=blobdiff_plain;f=lib%2FObject%2FRemote%2FRole%2FLogForwarder.pm;h=4a4f4afe0cb94e85e91de87f315c2a905a96b957;hp=3c1ef6241c683e2cb4dc83290efef525b32f0fc0;hb=5d59cb9859e004df5cde5d83aa7230e621a28b95;hpb=a63cd862186adf328e26dd1294e7a3b1adc42ed6

diff --git a/lib/Object/Remote/Role/LogForwarder.pm b/lib/Object/Remote/Role/LogForwarder.pm
index 3c1ef62..4a4f4af 100644
--- a/lib/Object/Remote/Role/LogForwarder.pm
+++ b/lib/Object/Remote/Role/LogForwarder.pm
@@ -16,30 +16,30 @@ has parent_router => ( is => 'rw', );#weak_ref => 1 );
 sub BUILD { }
 
 after BUILD => sub {
-    my ($self) = @_; 
-#    my $parent = $self->parent_router; 
-#    return unless defined $parent ; 
-#    $parent->add_child_router($self);
+  my ($self) = @_; 
+#  my $parent = $self->parent_router; 
+#  return unless defined $parent ; 
+#  $parent->add_child_router($self);
 };
 
 sub describe {
-    my ($self, $depth) = @_; 
-    $depth = -1 unless defined $depth; 
-    $depth++;
-    my $buf = "\t" x $depth . $self->description . "\n";
-    foreach my $child (@{$self->child_routers}) {
-        next unless defined $child; 
-        $buf .= $child->describe($depth);
-    }
+  my ($self, $depth) = @_; 
+  $depth = -1 unless defined $depth; 
+  $depth++;
+  my $buf = "\t" x $depth . $self->description . "\n";
+  foreach my $child (@{$self->child_routers}) {
+      next unless defined $child; 
+      $buf .= $child->describe($depth);
+  }
     
-    return $buf; 
+  return $buf; 
 }
 
 sub add_child_router {
-   my ($self, $router) = @_;
-   push(@{ $self->child_routers }, $router);
+  my ($self, $router) = @_;
+  push(@{ $self->child_routers }, $router);
 #   weaken(${ $self->child_routers }[-1]);
-   return; 
+  return; 
 }
 
 #sub remove_child_router {
@@ -48,11 +48,12 @@ sub add_child_router {
 #}
 
 after handle_log_message => sub {
-   my ($self, @args) = @_;
-   my $parent = $self->parent_router;
+  my ($self, @args) = @_;
+  my $parent = $self->parent_router;
       
-   return unless defined $parent;
-   $parent->handle_log_message(@args);
+  return unless defined $parent;
+  $parent->handle_log_message(@args);
 };
 
 1;
+