Permalink
Browse files

raises a clear error message

  • Loading branch information...
1 parent 3532010 commit 89e55784c346b2c0f1db0c9a9314150247049c8c @dochang committed Nov 28, 2010
Showing with 2 additions and 1 deletion.
  1. +2 −1 src/installer.lisp
View
@@ -126,7 +126,8 @@
(delete-package package))))))
((with-project-file (in project-name "url")
(let* ((url (read-line in nil nil)))
- (and url (make-installer url project)))))))))
+ (and url (make-installer url project)))))
+ ((error "Cannot install ~A: url not found.~%" project-name))))))
(defun install-project (project &key url)
"Installs PROJECT. If URL is a function, use it to install; if URL

0 comments on commit 89e5578

Please sign in to comment.