diff options
author | Jesse Luehrs <doy@tozt.net> | 2012-03-05 22:56:18 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2012-03-05 22:56:18 -0600 |
commit | 0f6d95e7959d2978a869b373649fc5e49f733159 (patch) | |
tree | 10700bfb03f62a2f9e414f236c488c70d3b7b1d1 /t/callbacks.t | |
parent | 1ac156b50b0262a7bfcce77eb54f2d627d45d2ec (diff) | |
download | term-filter-0f6d95e7959d2978a869b373649fc5e49f733159.tar.gz term-filter-0f6d95e7959d2978a869b373649fc5e49f733159.zip |
factor out the callback stuff, make Term::Filter a role
Diffstat (limited to 't/callbacks.t')
-rw-r--r-- | t/callbacks.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/t/callbacks.t b/t/callbacks.t index 05ac5f7..5197b32 100644 --- a/t/callbacks.t +++ b/t/callbacks.t @@ -9,8 +9,8 @@ use IO::Select; my $script = <<'SCRIPT'; use strict; use warnings; -use Term::Filter; -my $term = Term::Filter->new( +use Term::Filter::Callback; +my $term = Term::Filter::Callback->new( callbacks => { setup => sub { my ($t, @cmd) = @_; @@ -63,7 +63,7 @@ alarm 60; $ }sx; - is($ref, 'Term::Filter', "setup callback got a Term::Filter object"); + is($ref, 'Term::Filter::Callback', "setup callback got a Term::Filter::Callback object"); $pty->write("fOo\n"); |