X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FGeomag.pm;h=8f17eaf32000442462ca1bd1bbbf840e4e942dd9;hb=6ccc3a6e864a2fee18786a7070400c7c4f22cf7c;hp=dc003638209c70b3095875e63042c40f27bc8633;hpb=4d15706f4faf4a779650492077b08434e99f748e;p=spider.git diff --git a/perl/Geomag.pm b/perl/Geomag.pm index dc003638..8f17eaf3 100644 --- a/perl/Geomag.pm +++ b/perl/Geomag.pm @@ -51,13 +51,13 @@ $filterdef = bless ([ # tag, sort, field, priv, special parser ['by', 'c', 7], ['origin', 'c', 8], - ['channel', 'n', 9], - ['by_dxcc', 'n', 10], - ['by_itu', 'n', 11], - ['by_zone', 'n', 12], - ['origin_dxcc', 'c', 13], - ['origin_itu', 'c', 14], - ['origin_itu', 'c', 15], + ['channel', 'c', 9], + ['by_dxcc', 'nc', 10], + ['by_itu', 'ni', 11], + ['by_zone', 'nz', 12], + ['origin_dxcc', 'nc', 13], + ['origin_itu', 'ni', 14], + ['origin_zone', 'nz', 15], ], 'Filter::Cmd'); sub init