diff --git a/scsh/test/env-test-code.scm b/scsh/test/env-test-code.scm
index 509d086..2d3cb77 100644
--- a/scsh/test/env-test-code.scm
+++ b/scsh/test/env-test-code.scm
@@ -181,7 +181,7 @@
 ; checks if exec-path-list is a string-list
 ; OK 2001-04-09 15:45
 (define (exec-path-list-test)
-  (string-list? exec-path-list))
+  (string-list? (fluid exec-path-list)))
 
 
 ; OK 2001-04-09 15:45
diff --git a/scsh/test/test-packages.scm b/scsh/test/test-packages.scm
index 5a98835..924276c 100644
--- a/scsh/test/test-packages.scm
+++ b/scsh/test/test-packages.scm
@@ -44,6 +44,7 @@
    add-after-test)
   (open scsh
 	scheme
+ 	fluids
 	list-lib
 	string-lib)
   (files env-test-code))