svn: r1606
This commit is contained in:
Jacob Matthews 2005-12-13 05:48:56 +00:00
parent 93bab6de21
commit b87d92df49

View File

@ -37,5 +37,4 @@
;; SIDE EFFECT: creates the directory if it doesn't already exist
(define (get-planet-cache-path)
(let ((path (build-path (PLANET-DIR) "cache.ss")))
(make-directory* (PLANET-DIR))
path)))