diff options
-rw-r--r-- | src/data/files-tree.lisp | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/src/data/files-tree.lisp b/src/data/files-tree.lisp index 8418a80..b0f240c 100644 --- a/src/data/files-tree.lisp +++ b/src/data/files-tree.lisp @@ -26,11 +26,12 @@ LOCATION is either a designator for a pathname representing the root of the tree of files or a symbol which designates an ASDF package where the tree is contained in the subdirectory 'data/'. -IDEN1 specifies a (possibly nested) subdirectory under LOCATION and IDEN2 a -relative path within that subdirectory. For convenience IDEN1 and IDEN2 may -be passed as absolute and will be converted to relative paths. The usual -cases of IDEN1 as a hostname, IDEN1 as an underscore-prefixed identifier, and -IDEN2 an an absolute or relative path are all supported." +LOCATION, IDEN1 and IDEN2 are concatenated to locate files. Thus, IDEN1 +specifies a (possibly nested) subdirectory under LOCATION and IDEN2 a relative +path within that subdirectory. For convenience IDEN1 and IDEN2 may be passed +as absolute and will be converted to relative paths. The usual cases of IDEN1 +as a hostname, IDEN1 as an underscore-prefixed identifier, and IDEN2 an an +absolute or relative path are all supported." (let ((base-path (if (symbolp location) (asdf:system-relative-pathname location "data/") (ensure-directory-pathname location)))) |