mirror of
https://github.com/perlbot/perlbuut
synced 2025-06-08 02:55:40 -04:00
fixing path
This commit is contained in:
parent
e15efabfb5
commit
992cda5092
1 changed files with 1 additions and 1 deletions
|
@ -52,7 +52,7 @@ sub command {
|
||||||
warn "Found $type: $code";
|
warn "Found $type: $code";
|
||||||
|
|
||||||
my $filter = POE::Filter::Reference->new();
|
my $filter = POE::Filter::Reference->new();
|
||||||
my $socket = IO::Socket::INET->new( PeerAddr => 'simcop2387.info', PeerPort => '14400' )
|
my $socket = IO::Socket::INET->new( PeerAddr => 'home.simcop2387.info', PeerPort => '14400' )
|
||||||
or die "error: cannot connect to eval server";
|
or die "error: cannot connect to eval server";
|
||||||
my $refs = $filter->put( [ { code => "$type $code" } ] );
|
my $refs = $filter->put( [ { code => "$type $code" } ] );
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue