diff --git a/cclan.lisp b/cclan.lisp index acc709c1e51a1a8a752d468c5462c99469b1fe1e..5937518c3962edcc679cbdc01881f39effb09734 100644 --- a/cclan.lisp +++ b/cclan.lisp @@ -61,7 +61,7 @@ at your own peril.~%" suggested-registry suggested-registry system-name suggeste (sb-unix:unix-getpid) (get-internal-run-time)))) (system (find-system system)) (sub-dir-name - (format nil "~A-~A" + (format nil "~A_~A" (component-name system) (component-version system))) (cvsroot-file (merge-pathnames "CVS/Root" (component-pathname system)))