Lines Matching refs:ReadLine
11 package Term::ReadLine::Mock;
12 our @ISA = 'Term::ReadLine::Stub';
13 sub ReadLine {'Term::ReadLine::Mock'};
23 use_ok('Term::ReadLine');
26 my $t = new Term::ReadLine 'test term::readline';
30 isa_ok($t, 'Term::ReadLine::Mock');
32 for my $method (qw( ReadLine readline addhistory IN OUT MinLine
37 is($t->ReadLine, 'Term::ReadLine::Mock', "\$object->ReadLine");