Permalink
Browse files

Overload "<>" operator in test object to match new usage

  • Loading branch information...
rwstauner committed Oct 12, 2010
1 parent e1690b4 commit d64fb88ddea1843c4a6271e57b28d5ff0b223a08
Showing with 3 additions and 0 deletions.
  1. +3 −0 t/01-generic.t
View
@@ -4,6 +4,9 @@ plan tests => 4 * $times;
{
package TestEcho;
+ use overload
+ 'bool' => sub { $_[0] }, # allow ||= operator
+ '<>' => \&getline; # emulate IO
# echo server for easy testing
sub new { bless [], $_[0]; }

0 comments on commit d64fb88

Please sign in to comment.