--- cvsroot/AnyEvent-Porttracker/Porttracker.pm	2010/11/16 17:37:49	1.13
+++ cvsroot/AnyEvent-Porttracker/Porttracker.pm	2010/11/16 19:43:15	1.14
@@ -37,8 +37,8 @@
          my ($gid, $name) = @$realm;
 
          $cv->begin;
-         $api->req (realm_discover => $realm->[0], sub {
-            warn "discovery for realm '$realm->[1]' finished\n";
+         $api->req (realm_discover => $gid, sub {
+            warn "discovery for realm '$name' finished\n";
             $cv->end;
          });
       }