premjestio remoteStart evasion na prikladnije mjesto

diff --git a/imunes b/imunes
index 8377e7d4fd009c0cdb0672a9dd542e33349ef4e0..595ba99816da1a12678407734ac01307d129a374 100755 (executable)
--- a/imunes
+++ b/imunes
@@ -38,9 +38,6 @@ LIBDIR=""
 
 imunes=$ROOTDIR/$LIBDIR/imunes.tcl
 
-# zbog testiranja lokalnog Linuxa ne zelimo automatski remoteStart
-test `id -u` = 0 || { echo 'you are not root (id != 0)'; exit 1; }
-
 case $1 in 
 -b | --batch) 
     exec tclsh8.4 $imunes "$@" 

diff --git a/imunes.tcl b/imunes.tcl
index 30c0830645699f56629d1e27264e640d048e3f38..6968c7db295e0a621a235ecb13dfb95b3baf0a65 100755 (executable)
--- a/imunes.tcl
+++ b/imunes.tcl
@@ -266,6 +266,11 @@ if { $gui_unix && $::env(USERNAME) == "root" } {
     set remote_exec false
 }
 
+# zbog testiranja lokalnog Linuxa ne zelimo automatski remoteStart
+if { $gui_unix && $gui_linux && $remote_exec } {
+    puts "you are not root (id != 0) but for our purposes you have to be"
+    exit 1
+}
 
 #
 # Read config files, the first one found: .imunesrc, $HOME/.imunesrc