From 02b6f240e9722a2d7078d0bdceb8abc01695d0b6 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Mon, 29 Jun 2009 04:45:40 -0500 Subject: don't hardcode 99 in this test --- t/001-ping.t | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/t/001-ping.t b/t/001-ping.t index de4db7d..b6c1a08 100644 --- a/t/001-ping.t +++ b/t/001-ping.t @@ -59,7 +59,8 @@ my $client = IO::Socket::Telnet::HalfDuplex->new( $client->telnet_simple_callback(sub { my $self = shift; my ($msg) = @_; - $pong++ if $msg =~ /99$/; + my $ping = ord($PONG); + $pong++ if $msg =~ /$ping$/; return ''; }); $client->send('blah'); -- cgit v1.2.3-54-g00ecf