add by_dxcc to sh/dx
[spider.git] / cmd / show / dx.pl
index f2629bfff0e225ef7249e358a17b166f46d38708..f359aec0cd0cef3ff60a3343fd4f99e830ad4936 100644 (file)
@@ -81,10 +81,12 @@ while ($f = shift @list) {          # next field
                $info = shift @list;
                next;
        }
-       if ((lc $f eq 'spotter' || lc $f eq 'by') && $list[0]) {
+       if ((lc $f eq 'spotter' || lc $f eq 'by' || lc $f eq 'by_dxcc') && $list[0]) {
                #    print "got spotter\n";
                $spotter = uc shift @list;
-               if ($list[0] && lc $list[0] eq 'dxcc') {
+               if ($f eq 'by_dxcc') {
+                       $fromdxcc = 1;
+               } elsif ($list[0] && lc $list[0] eq 'dxcc') {
                        $fromdxcc = 1;
                        shift @list;
                }