diff --git a/roswell/make-project b/roswell/make-project
index 302aba2..8fb5c18 100755
--- a/roswell/make-project
+++ b/roswell/make-project
@@ -37,7 +37,7 @@ A command-line interface for cl-project:make-project.
     (let ((path (pop args)))
       (when (starts-with-subseq "--" path)
         (terminate "No path given."))
-      (cons path
+      (cons (pathname path)
             (loop for index from 0 below (length args)
                   for first = (elt args index)
                   for rest = (subseq args (incf index))