Cleanup

vti · Apr 9, 2011 · 726cc24 · 726cc24
1 parent 57da1e1
commit 726cc24
Showing 1 changed file with 9 additions and 7 deletions.
diff --git a/lib/Terminal/Handle.pm b/lib/Terminal/Handle.pm
@@ -14,22 +14,24 @@ sub new {
 
     $self->{handle} = AnyEvent::Handle->new(
         fh       => $self->{fh},
-        on_error => sub {
+        on_read => sub {
             my $handle = shift;
-            my ($is_fatal, $message) = @_;
+
+            my $chunk = $handle->rbuf;
+            $handle->rbuf = '';
+
+            $self->{on_read}->($self, $chunk);
         },
         on_eof => sub {
             my $handle = shift;
 
             $self->{on_eof}->($self);
         },
-        on_read => sub {
+        on_error => sub {
             my $handle = shift;
+            my ($is_fatal, $message) = @_;
 
-            my $chunk = $handle->rbuf;
-            $handle->rbuf = '';
-
-            $self->{on_read}->($self, $chunk);
+            $self->{on_error}->($message);
         }
     );