find-relevant-directories: fix 'no-user mode
This commit is contained in:
parent
8f195a1ff6
commit
7a8b2e333b
|
@ -211,8 +211,7 @@
|
|||
(cons (build-path coll "info-domain" "compiled" "cache.rktd")
|
||||
coll))
|
||||
(if (eq? key 'no-user)
|
||||
(remove* (get-main-collects-search-dirs)
|
||||
(current-library-collection-paths))
|
||||
(get-main-collects-search-dirs)
|
||||
(current-library-collection-paths)))
|
||||
(map (lambda (base)
|
||||
(cons (build-path base "info-cache.rktd")
|
||||
|
|
Loading…
Reference in New Issue
Block a user