Ensure path exists before using it
Heime <[email protected]>
| Newsgroups | gmane.emacs.help |
|---|---|
| Message-ID | <dpAjtl0TTWT7IuWKkmd5_YweLJ2HC5OGSWqTerKpgeRtIasXCso4WDjIsdnJr2DKVfogZ4J6NmaDQXviNA9Xmg4SRt66QnIFZ8lUkhnMm3w=@protonmail.com> |
I want to improve this bit of elisp code ensuring that bash-path
exists.
(let* ( ;; Relative subdirectory that doesn't start with / or ~
(subdir (or subdir "orellana"))
;; Determine the base path: argument, directory, or env var
(base-path
(or bspt
(and (file-directory-p
(substitute-in-file-name
"$HOME/Opstk/src/hist-1.0/"))
(substitute-in-file-name
"$HOME/Opstk/src/hist-1.0/"))
(expand-file-name "~/Opstk/src/hist-1.0/")
(getenv "ORELLANA_PATH")))
;; Construct the full path to feature
(ftpath (expand-file-name subdir base-path)) )