X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXVars.pm.issue;h=b4058cf0271595bc53eaf89377cb103b792b2151;hb=63cd679163fe336521e95e8af821b30d4bc1b9e9;hp=ab43ca6489195ae63c7f3f8f87de45f3b4ff8cb8;hpb=9da1742219a27b1c02fd57794412088e4d7b3d1d;p=spider.git

diff --git a/perl/DXVars.pm.issue b/perl/DXVars.pm.issue
index ab43ca64..b4058cf0 100644
--- a/perl/DXVars.pm.issue
+++ b/perl/DXVars.pm.issue
@@ -2,33 +2,20 @@
 # The system variables - those indicated will need to be changed to suit your
 # circumstances (and callsign)
 #
-# Copyright (c) 1998 - Dirk Koopman G1TLH
+# Copyright (c) 1998-2007 - Dirk Koopman G1TLH
 #
-# $Id$
 #
 
 package main;
 
-require Exporter;
-@ISA = qw(Exporter);
-
-@EXPORT_OK = qw($mycall $myname $myalias $mylatitude $mylongtitude $mylocator
-                $myqth $myemail $myprot_version 
-                $clusterport $clusteraddr $debugfn 
-                $def_hopcount $data $system $cmd
-				$userfn $motd $local_cmd $mybbsaddr
-                $lang
-				$pc50_interval $user_interval
-               );
-			   
-			   
 # this really does need to change for your system!!!!			   
+# use CAPITAL LETTERS
 $mycall = "GB7DJK";
 
 # your name
 $myname = "Dirk";
 
-# Your 'normal' callsign 
+# Your 'normal' callsign (in CAPTTAL LETTERS) 
 $myalias = "G1TLH";
 
 # Your latitude (+)ve = North (-)ve = South in degrees and decimal degrees
@@ -37,7 +24,7 @@ $mylatitude = +52.68584579;
 # Your Longtitude (+)ve = East, (-)ve = West in degrees and decimal degrees
 $mylongitude = +0.94518260;
 
-# Your locator (yes I know I can calculate it - eventually)
+# Your locator (USE CAPITAL LETTERS)
 $mylocator = "JO02LQ";
 
 # Your QTH (roughly)
@@ -52,6 +39,15 @@ $mybbsaddr = "G1TLH\@GB7TLH.#35.GBR.EU";
 # the default language (the key used must match the one in the Messages file)
 $lang = 'en';
 
+# the country codes that my node is located in
+# 
+# for example 'qw(EA EA8 EA9 EA0)' for Spain and all its islands.
+# if you leave this blank then it will use the country code for
+# your $mycall. This will suit 98% of sysops (including GB7 BTW).
+#
+
+@my_cc = qw();
+
 # the tcp address of the cluster this can be an address of an ethernet port
 # but this is more secure. For normal use this will be fine. 
 $clusteraddr = "localhost";
@@ -68,23 +64,16 @@ $no = 'No';
 # the interval between unsolicited prompts if not traffic
 $user_interval = 11*60;
 
-# data files live in 
-$data = "$root/data";
-
-# system files live in
-$system = "$root/sys";
 
-# command files live in
-$cmd = "$root/cmd";
-
-# local command files live in (and overide $cmd)
-$localcmd = "$root/local_cmd";
+# are we debugging ?
+@debug = qw(chan state msg cron connect);
 
-# where the user data lives
-$userfn = "$data/users";
+# are we doing xml?
+$do_xml = 0;
 
-# the "message of the day" file
-$motd = "$data/motd";
+# the SQL database DBI dsn
+#$dsn = "dbi:SQLite:dbname=$root/data/dxspider.db";
+#$dbuser = "";
+#$dbpass = "";
 
-# are we debugging ?
-@debug = ('chan', 'state', 'msg', 'cron');
+1;