Skip to content

Commit

Permalink
Fix the pathname detection
Browse files Browse the repository at this point in the history
Seems like when the file is on the ARG, not always is a PATHNAME,
sometimes is a string that can be a valid absolute pathname.

Checking the absolute path seems to solve the issue.
  • Loading branch information
Sasanidas committed Nov 27, 2023
1 parent a885028 commit d5f2383
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion src/commands/file.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -82,7 +82,8 @@
:directory (buffer-directory)
:default nil
:existing nil))
((pathnamep arg)
((or (pathnamep arg)
(uiop:absolute-pathname-p arg))
(namestring arg)))))
(let (buffer)
(dolist (pathname (expand-files* filename))
Expand Down

0 comments on commit d5f2383

Please sign in to comment.