Support for the new hierarchical naming scheme.

"default" (vimage) is now known as ".".

Bug found by:
Submitted by:
Reviewed by:
Approved by:
Obtained from:

diff --git a/exec.tcl b/exec.tcl
index 2f988451925a35092c9cb15ca2616c12c17ed47b..d7208ed5f9018522a4cc1fbc4421d4e3029c7a0e 100755 (executable)
--- a/exec.tcl
+++ b/exec.tcl
@@ -1,4 +1,4 @@
-# $Id: exec.tcl,v 1.58 2007/10/09 11:22:51 marko Exp $
+# $Id: exec.tcl,v 1.59 2007/10/23 14:14:10 ana Exp $
 
 # Copyright 2004, 2005 University of Zagreb, Croatia.  All rights reserved.
 #
@@ -633,7 +633,7 @@ proc vimageCleanup {} {
 
     set t_start [clock seconds]
     set vimages [join [nexec vimage -l | fgrep -v "    " | cut -d: -f 1]]
-    set defindex [lsearch $vimages default]
+    set defindex [lsearch $vimages .]
     set vimages [lreplace $vimages $defindex $defindex]
 
     # Kill all processes in all vimages

diff --git a/imunes b/imunes
index 6f60ee29b3670fe29fd50da10734d294f5d88873..fdaddf2937032ccd9b9b5a7e99d6199acd4c684c 100755 (executable)
--- a/imunes
+++ b/imunes
@@ -37,7 +37,7 @@
 
 if [ `id -ur` -eq 0 -a -x /sbin/vimage ]; then
     vimage=`vimage`
-    if [ `expr ${vimage} != "default"` -ne 0 ]; then
+    if [ `expr ${vimage} != "."` -ne 0 ]; then
        echo "Imunes cannot be started from virtual image!"
        echo "(exit to default and try again)"
        exit 2