Adjust the test for exec-path-list.

2002-05-10 07:24:37 +00:00 · 2002-05-10 07:24:37 +00:00 · 73092cb733
parent cdd0b40057
commit 73092cb733
2 changed files with 2 additions and 2 deletions
--- 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? (fluid exec-path-list)))
+  (string-list? (thread-fluid exec-path-list)))


 ; OK 2001-04-09 15:45
--- a/scsh/test/test-packages.scm
+++ b/scsh/test/test-packages.scm
@ -43,7 +43,7 @@
   add-after-test)
  (open scsh
 	scheme
- 	fluids
+ 	thread-fluids
 	list-lib
 	string-lib)
  (files env-test-code))