Skip to content
Snippets Groups Projects
Commit adaadb3f authored by Raymond Toy's avatar Raymond Toy
Browse files

Remove debugging print

parent e637721a
No related branches found
No related tags found
1 merge request!94Fix #135: (unix-namestring ".") should be "./"
......@@ -786,7 +786,6 @@
(let ((name (%pathname-name pathname))
(type (%pathname-type pathname))
(version (%pathname-version pathname)))
(format t "name type version = ~S ~S ~S~%" name type version)
(cond ((member name '(nil :unspecific))
(when (or (not verify-existence)
(unix:unix-file-kind directory))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment