put pc16/17 handling back the way it was

[spider.git] / perl / DXCommandmode.pm

diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm
index f451a434d0ebe239ba388d568fe2cf478af71fe7..02164669eeef0e319206de79b58ea46d3b3e4543 100644 (file)
--- a/perl/DXCommandmode.pm
+++ b/perl/DXCommandmode.pm
@@ -71,7 +71,7 @@ sub new
        my @rout = $main::routeroot->add_user($call, Route::here(1));
 
        # ALWAYS output the user
-       my $thing = Thingy::Hello->new(user => $self->{call});
+       my $thing = Thingy::Hello->new(user => $call);
        $thing->broadcast($self);
        
        my $ref = Route::User::get($call);