[ViewVC] Diff of: cvs/AnyEvent-MP/bin/aemp

Comparing AnyEvent-MP/bin/aemp (file contents):
Revision 1.54 by root, Sat Mar 3 20:35:10 2012 UTC vs.
Revision 1.55 by root, Thu Mar 8 21:37:51 2012 UTC

 When secure mode is enabled, then remote nodes cannot execute code
 locally, at least not via the normal node protocol. All other messages are
 still allowed. This means remote nodes can monitor, kill or local ports
 (port names can be easily guessed).
-At the moment, this affects C<eval_on> and C<spawn> functionality.
+At the moment, this affects C<snd_on>, C<eval_on> and C<spawn>
+functionality.
 The C<configure> function additionally allows you to specify a callback
 that can grant or suppress such requests on a per-node basis.
 =item [set|del]monitor_timeout <seconds>
    my $to = AE::timer 15, 0, sub { exit 1 };
    init;
    my $reply = port {
-      my ($node, @neigh) = @_;
+      my ($node, undef, @neigh) = @_;
       @neigh = grep $_ ne $NODE, @neigh;
-      print +(join " ", $node, @neigh), "\n";
+      print $node, " -> ", (join " ", @neigh), "\n";
       for (@neigh) {
          unless ($seen{$_}++) {
             $cv->begin;
-            snd $_, up_nodes => $SELF => $_;
+            AnyEvent::MP::Kernel::eval_on $_, "AnyEvent::MP::Kernel::up_nodes" => $SELF => $_;
          }
       }
       $cv->end;
    };
    $cv->begin;
-   snd $reply, seed => $node;
+   snd $reply, $node => undef, AnyEvent::MP::Kernel::up_nodes;
    $cv->recv;
 }
 sub shell {

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines