]> git.entuzijast.net Git - imunes.git/commitdiff
izgleda da je debug rezervirana varijable iz nekog razloga (zaboravljeni dio)
authorJosip Rodin <joy@debian.(none)>
Mon, 9 Nov 2009 16:02:38 +0000 (17:02 +0100)
committerJosip Rodin <joy@debian.(none)>
Mon, 9 Nov 2009 16:02:38 +0000 (17:02 +0100)
imunes.tcl

index 13997463048e4e3816ea335fbc846a7d9474595e..ae83376a3dd61ebfb8381b09f0c5437239e795ed 100755 (executable)
@@ -49,7 +49,7 @@ set execMode interactive
 set eid_base i[format %04x [pid]]
 
 # debug output to shell
-set debug false
+set imunes_debug false
 
 while { [string index [lindex $argv 0] 0] == "-" } {
     switch -exact -- [lindex $argv 0] {
@@ -66,10 +66,10 @@ while { [string index [lindex $argv 0] 0] == "-" } {
        "-d" -
        "--debug" {
        # debug output to shell
-           set debug "true"
+           set imunes_debug "true"
            set argv [lrange $argv 1 end]
-           if { $debug } {
-           puts "DEBUG == $debug"
+           if { $imunes_debug } {
+           puts "DEBUG == $imunes_debug"
        }
        }
        default {
@@ -274,7 +274,7 @@ set exec_sockets_opened false
 #*****
 
 set remote_exec true
-if { $debug } {
+if { $imunes_debug } {
     puts "user is $tcl_platform(user)"
 }
 if { $gui_unix && $tcl_platform(user) == "root" } {