Fix extra escape characters in certain format codes

2025-10-25 19:03:35 -07:00
parent ea0face5b6
commit fa9af1d225
2 changed files with 12 additions and 6 deletions
--- a/clash/clash.lisp
+++ b/clash/clash.lisp
@ -910,7 +910,8 @@ return a list of many indices instead."
                           (merge-pathnames uiop:*wild-file-for-directory*
                                            (uiop:ensure-directory-pathname
                                             (merge-pathnames "files" dir))))))
-        (format t "~A~:[~%~;~A~]" missing null #\Nul)))))
+        (format t "~A~:[~%~;~A~]"
+                (uiop:native-namestring missing) null #\Nul)))))

 (defun missing-file/handler (cmd)
  "Handler for the \"missing file\" subcommand."