removed misplaced "my"
authorerickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Mon, 25 Aug 2008 20:05:39 +0000 (20:05 +0000)
committererickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Mon, 25 Aug 2008 20:05:39 +0000 (20:05 +0000)
git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@1425 9efc2488-bf62-4759-914b-345cdb29e865

src/perl/lib/OpenSRF/AppSession.pm

index 941e3dd..b322665 100644 (file)
@@ -755,7 +755,7 @@ sub recv {
 sub timed_out {
     my $self = shift;
     my $out = shift;
 sub timed_out {
     my $self = shift;
     my $out = shift;
-    my $self->{timed_out} = $out if (defined $out);
+    $self->{timed_out} = $out if (defined $out);
     return $self->{timed_out};
 }
 
     return $self->{timed_out};
 }