Handle slashed names more.

quicklisp · Feb 10, 2014 · fb7740c · fb7740c
1 parent c51f90a
commit fb7740c
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/dist-cache.lisp b/dist-cache.lisp
@@ -327,7 +327,8 @@ if needed."
         (funcall fun system-file-name system)))))
 
 (defun acceptable-system-name (name)
-  (not (position #\/ name)))
+  (declare (ignore name))
+  t)
 
 (defun cache-winning-systems (source &key (recheck t))
   "A source may have multiple system files in it. Each system file