just remove unknown case

This commit is contained in:
Masataro Asai 2017-11-30 14:12:44 +09:00
parent 40f7f90058
commit 679f868131

View file

@ -175,9 +175,6 @@ have the latest asdf, and this file has a workaround for this.
;; which is <directory containing setup.lisp>/local-projects/ .
for path in `(;; Searches local-project/ in the current directory
,local
;; This is WHAAAAAT????
,(ignore-errors
(truename (merge-pathnames "../../../local-projects/" (first (symbol-value symbol)))))
;; Searches local-project/ in e.g. ~/.roswell/
,(merge-pathnames "local-projects/" (opt "homedir")))
for probe = (and path (or (ignore-errors (probe-file path))