allow store nodes that have a dxchannel

[spider.git] / cmd / show / configuration.pl

diff --git a/cmd/show/configuration.pl b/cmd/show/configuration.pl
index 746ab4b0068390b9b32e8bc08c20a1fb3e35a221..3101c5352f0466d95e615ee5d98bea914c928036 100644 (file)
--- a/cmd/show/configuration.pl
+++ b/cmd/show/configuration.pl
@@ -3,7 +3,7 @@
 #
 # Copyright (c) 1998 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #
 
 my ($self, $line) = @_;
@@ -21,7 +21,7 @@ if ($list[0] && $list[0] =~ /^NOD/) {
        
        foreach my $n (@nodes) {
                $dxchan = $n->dxchan;
-               push @{$ch{$dxchan->call}}, $n;
+               push @{$ch{$dxchan->call}}, $n if $dxchan;
        }
 
        foreach my $call (sort keys %ch) {