X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXChannel.pm;h=6b0bb554abebcbf877ad51558df696c4cd3e8f0b;hb=575db552c5a635ce2eb431de07f568113374735f;hp=d566c177c05f07a1ac0b76eac0419db98934010e;hpb=23bebd4158e9b66ba5c72c786e76309f6e2b5757;p=spider.git diff --git a/perl/DXChannel.pm b/perl/DXChannel.pm index d566c177..6b0bb554 100644 --- a/perl/DXChannel.pm +++ b/perl/DXChannel.pm @@ -28,6 +28,7 @@ package DXChannel; use Msg; use DXM; use DXUtil; +use DXVars; use DXDebug; use Filter; @@ -74,11 +75,11 @@ use vars qw(%channels %valid); annfilter => '5,Announce Filter', wwvfilter => '5,WWV Filter', wcyfilter => '5,WCY Filter', - spotfilter => '5,Spot Filter', + spotsfilter => '5,Spot Filter', inannfilter => '5,Input Ann Filter', inwwvfilter => '5,Input WWV Filter', inwcyfilter => '5,Input WCY Filter', - inspotfilter => '5,Input Spot Filter', + inspotsfilter => '5,Input Spot Filter', passwd => '9,Passwd List,parray', pingint => '5,Ping Interval ', nopings => '5,Ping Obs Count', @@ -102,10 +103,10 @@ sub DESTROY undef $self->{delayed}; undef $self->{annfilter}; undef $self->{wwvfilter}; - undef $self->{spotfilter}; + undef $self->{spotsfilter}; undef $self->{inannfilter}; undef $self->{inwwvfilter}; - undef $self->{inspotfilter}; + undef $self->{inspotsfilter}; undef $self->{passwd}; undef $self->{node}; }