diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2022-07-21 16:39:02 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-07-21 16:53:47 -0700 |
commit | f960080775cdd66fc1409124571903dc409c9709 (patch) | |
tree | 7f4e45404cb7cdffbee3483ab08a400bf80b0de2 | |
parent | 6226c1f6684a2db9128c75ed72126f672d45a33c (diff) | |
download | consfigurator-f960080775cdd66fc1409124571903dc409c9709.tar.gz |
DATA.FILES-TREE: be slightly more explicit about path concatenation
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
-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)))) |