added Bands to allow on 6m

diff --git a/perl/gdx.pl b/perl/gdx.pl
index c3e22364f79062fff340640990aefe5347c5b350..f88761ab5ec5285a35f7078955c50576491a18db 100755 (executable)
--- a/perl/gdx.pl
+++ b/perl/gdx.pl
@@ -15,6 +15,7 @@ BEGIN {
 
 use IO::Handle;
 use DXUtil;
+use Bands;
 use Spot;
 
 $dxdir = "/spider/cmd/show";
@@ -25,6 +26,7 @@ die $@ if $@;
 
 STDOUT->autoflush(1);
 Spot::init();
+Bands::load();
 
 for (;;) {
   print "expr: ";