From b4b03beaed00bc0abc74f12634ad0a26dbcf75c4 Mon Sep 17 00:00:00 2001
From: Bart Schaefer <barts@users.sourceforge.net>
Date: Fri, 28 Sep 2001 14:43:13 +0000
Subject: Module dependencies for unloading in tests.

---
 Test/V01zmodload.ztst | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'Test')

diff --git a/Test/V01zmodload.ztst b/Test/V01zmodload.ztst
index fef7d0232..3787024e1 100644
--- a/Test/V01zmodload.ztst
+++ b/Test/V01zmodload.ztst
@@ -12,6 +12,10 @@
    eval "$name $modfile $link $auto $load"
    [[ $link == no ]] && continue
    mods=($mods $name)
+   moddeps=
+   modfile=$ZTST_srcdir/../$modfile
+   eval ${${${(f)"$(<$modfile)"}[(r)moddeps=*]}:-:}
+   [[ -n $moddeps ]] && zmodload -d $name $=moddeps
  done < $ZTST_testdir/../config.modules
 
  zmodunload() {
@@ -157,5 +161,5 @@
 %clean
 
  eval "$deps"
- unset deps name modfile link auto load funcs mods
+ unset deps name modfile link auto load funcs mods moddeps
  unfunction zmodunload
-- 
cgit 1.4.1