fleshed out some commands (particularly flag setting and unsetting)

[spider.git] / perl / DXVars.pm

diff --git a/perl/DXVars.pm b/perl/DXVars.pm
index 11c26012735ede6361f65eae60b3ef50ffce02c7..5baf3a6790bfd98d401db06edbc04dc3a470bc76 100644 (file)
--- a/perl/DXVars.pm
+++ b/perl/DXVars.pm
@@ -59,6 +59,12 @@ $debugfn = "/tmp/debug_cluster";
 # the version of DX cluster (tm) software I am masquerading as
 $myprot = "5447";
 
+# your favorite way to say 'Yes'
+$yes = 'Yes';
+
+# your favorite way to say 'No'
+$no = 'No';
+
 # default hopcount to use - note this will override any incoming hop counts, if they are greater
 $def_hopcount = 7;
 
@@ -82,3 +88,6 @@ $userfn = "$data/users";
 
 # the "message of the day" file
 $motd = "$data/motd";
+
+# are we debugging ?
+@debug = ('chan');