From 9140c528f4036484a8f0473190aaaddbe3c2b5d7 Mon Sep 17 00:00:00 2001 From: Matthias Benkard Date: Wed, 20 Feb 2008 00:04:29 +0100 Subject: After copying the system, do a sanity test on the target directory before proceeding. darcs-hash:f93dd34bf4fea90f5f7481a03edd40f912011121 --- objective-cl-libobjcl.asd | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/objective-cl-libobjcl.asd b/objective-cl-libobjcl.asd index fb84218..c37c647 100644 --- a/objective-cl-libobjcl.asd +++ b/objective-cl-libobjcl.asd @@ -171,7 +171,8 @@ output-parent-dir))) (zerop (run-shell-command "cp -R -P -f -p '~A' '~A/'" (sanitise-dir-name source-dir) - output-parent-dir))))) + output-parent-dir)))) + (probe-file (merge-pathnames "GNUmakefile" output-dir))) ;; We couldn't use cp. Copy the files manually. (let ((sources (mapcar #'(lambda (x) -- cgit v1.2.3