From: Uri Guttman <uri@quad.(none)>
Date: Tue, 22 Sep 2009 21:57:40 +0000 (-0400)
Subject: cleaned up some debug prints
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b3d3e68ff7dcadd6d5a88197b6a04961c870656c;p=urisagit%2FStem.git

cleaned up some debug prints
---

diff --git a/lib/Stem/Log/Tail.pm b/lib/Stem/Log/Tail.pm
index 6698f8f..c79f806 100644
--- a/lib/Stem/Log/Tail.pm
+++ b/lib/Stem/Log/Tail.pm
@@ -100,7 +100,7 @@ sub new {
 	my $self = Stem::Class::parse_args( $attr_spec, @_ ) ;
 	return $self unless ref $self ;
 
-print "TAIL INT $self->{'interval'}\n" ;
+#print "TAIL INT $self->{'interval'}\n" ;
 
 	if ( my $interval = $self->{'interval'} ) {
 
@@ -113,7 +113,7 @@ print "TAIL INT $self->{'interval'}\n" ;
 				'hard'		=> 1,
 		) ;
 
-print "TIMER $self->{'timer'}\n" ;
+#print "TIMER $self->{'timer'}\n" ;
 
 	}
 
@@ -128,7 +128,7 @@ sub tail_cmd {
 
 	my( $self ) = @_ ;
 
-print "TAILING\n" ;
+#print "TAILING\n" ;
 
 	local( *LOG ) ;