Fixed bug in thread-change-resource (and thereby in chdir).

This commit is contained in:
mainzelm 2001-09-12 14:43:19 +00:00
parent f3e567e997
commit f4bd5dfa85
1 changed files with 1 additions and 0 deletions

View File

@ -203,6 +203,7 @@
(define (thread-change-resource dir) (define (thread-change-resource dir)
(with-lock resource-lock (with-lock resource-lock
(lambda () (lambda ()
(align-resource!)
(change-and-cache dir) (change-and-cache dir)
(thread-set-resource! (cache-value))))) (thread-set-resource! (cache-value)))))