From 0f6d95e7959d2978a869b373649fc5e49f733159 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Mon, 5 Mar 2012 22:56:18 -0600 Subject: factor out the callback stuff, make Term::Filter a role --- t/callbacks.t | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 't/callbacks.t') 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"); -- cgit v1.2.3-54-g00ecf