svn: r4479
This commit is contained in:
Eli Barzilay 2006-10-04 19:01:02 +00:00
parent 9cb8f01a09
commit 2abe03bac8

View File

@ -13,7 +13,7 @@
;; Note: (expand-path (simplify-path P #f)) is bogus, if P is ;; Note: (expand-path (simplify-path P #f)) is bogus, if P is
;; "./~foo" or "~foo/.." ;; "./~foo" or "~foo/.."
(define (system-path* what) (define (system-path* what)
(simplify-path (expand-path (find-system-path what) #f))) (simplify-path (expand-path (find-system-path what)) #f))
;; ---------------------------------------- ;; ----------------------------------------
;; "collects" ;; "collects"