From 534621a6c98a679f01f85d2d0ce8756b885ebdd6 Mon Sep 17 00:00:00 2001
From: marko <marko>
Date: Thu, 1 Nov 2007 21:51:48 +0000
Subject: [PATCH] Use the new "vimage -lr" form to traverse the entire vimage
 hierarchy bellow the current position, given that from now on "vimage -l"
 will list only direct children of current vimage.

Bug found by:
Submitted by:
Reviewed by:
Approved by:
Obtained from:
---
 exec.tcl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/exec.tcl b/exec.tcl
index 580d1e4..1675c3a 100755
--- a/exec.tcl
+++ b/exec.tcl
@@ -1,4 +1,4 @@
-# $Id: exec.tcl,v 1.62 2007/11/01 11:11:06 marko Exp $
+# $Id: exec.tcl,v 1.63 2007/11/01 21:51:48 marko Exp $
 
 # Copyright 2004, 2005 University of Zagreb, Croatia.  All rights reserved.
 #
@@ -641,7 +641,7 @@ proc vimageCleanup { eid } {
     global .c
 
     set t_start [clock seconds]
-    if { [catch {nexec vimage $eid vimage -l | fgrep -v "    " | cut -d: -f 1} res] != 0 } {
+    if { [catch {nexec vimage $eid vimage -lr | fgrep -v "    " | cut -d: -f 1} res] != 0 } {
 	return
     }
     set vimages [join $res]
-- 
2.39.5