<div>ensure-directories-exist fails when passed a logical pathname.</div><div><br></div><div>(defun ensure-directories-exist (pathspec &key verbose)</div><div>-  (let ((pathname (pathname pathspec))</div><div>+  (let ((pathname (translate-logical-pathname (pathname pathspec)))</div>
<div><span class="Apple-tab-span" style="white-space:pre">      </span>(created-p nil))</div><div>    (when (wild-pathname-p pathname)</div><div>   ....</div>