Changeset 5870

Timestamp:

07/06/09 00:09:42 (3 years ago)

Author:

submersible_toaster

Message:

unbreak makefile and debug listener

Location:

trunk/Padre-Plugin-Swarm

Files:

• Makefile.PL (modified) (1 diff)
• listener.pl (modified) (1 diff)

trunk/Padre-Plugin-Swarm/Makefile.PL

@@ -7 +7 @@
 requires      Params::Util
 requires      Class::XSAccessor
-requires      Class::AutoUse
+requires      Class::Autouse
 test_requires Test::More 0.42

trunk/Padre-Plugin-Swarm/listener.pl

@@ -11 +11 @@
 
 while ( 1 ) {
-    $mc->poll(1);
+    my ($channel) = $mc->poll(1);
+    next unless $channel;
+    warn $sock;
     my $buffer;
-    my ($message,$frame) = $mc->receive_from( 12000 );
+    my ($message,$frame) = $mc->receive_from_channel( $channel  );
     print Dumper $frame;
     print Dumper $message;