Revision: 3453 Author: ksprotte URL: http://bknr.net/trac/changeset/3453

made bos test fixture INITIAL-BOS-STORE more robust for ccl

U trunk/projects/bos/test/fixtures.lisp

Modified: trunk/projects/bos/test/fixtures.lisp =================================================================== --- trunk/projects/bos/test/fixtures.lisp 2008-07-15 15:44:31 UTC (rev 3452) +++ trunk/projects/bos/test/fixtures.lisp 2008-07-16 08:59:09 UTC (rev 3453) @@ -56,8 +56,9 @@ :website-url bos.m2::*website-url*) (make-user "anonymous") ; needed for web tests (&body)) - (close-store) - (cl-fad:delete-directory-and-files store-path)))) + (close-store) + ;; (cl-fad:delete-directory-and-files store-path) ; fails on ccl + (asdf:run-shell-command "rm -r '~A'" store-path))))

(defmacro store-test (name &body body) `(progn