X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FAnnTalk.pm;h=b48dc7e0ca56f58a1bc8ed5693541cf89d6bbc93;hb=6ccc3a6e864a2fee18786a7070400c7c4f22cf7c;hp=982e9c49afc9eb99b679ac180ecbdab8a48af0a4;hpb=4d15706f4faf4a779650492077b08434e99f748e;p=spider.git diff --git a/perl/AnnTalk.pm b/perl/AnnTalk.pm index 982e9c49..b48dc7e0 100644 --- a/perl/AnnTalk.pm +++ b/perl/AnnTalk.pm @@ -27,13 +27,13 @@ $filterdef = bless ([ ['group', 't', 3], ['origin', 'c', 4], ['wx', 't', 5], - ['channel', 'n', 6], - ['by_dxcc', 'n', 7], - ['by_itu', 'n', 8], - ['by_zone', 'n', 9], - ['origin_dxcc', 'n', 10], - ['origin_itu', 'n', 11], - ['origin_itu', 'n', 12], + ['channel', 'c', 6], + ['by_dxcc', 'nc', 7], + ['by_itu', 'ni', 8], + ['by_zone', 'nz', 9], + ['origin_dxcc', 'nc', 10], + ['origin_itu', 'ni', 11], + ['origin_zone', 'nz', 12], ], 'Filter::Cmd'); use vars qw($VERSION $BRANCH);