From f960080775cdd66fc1409124571903dc409c9709 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Thu, 21 Jul 2022 16:39:02 -0700 Subject: DATA.FILES-TREE: be slightly more explicit about path concatenation Signed-off-by: Sean Whitton --- src/data/files-tree.lisp | 11 ++++++----- 1 file 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)))) -- cgit v1.2.3