X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fruntime.c;h=908bd8cbacf1c426c05375b95c06d8d7689b2aed;hb=edc8da40fb17de047e290ed6bd819e096e435dc9;hp=55f4d503bb84561743dfe495a38902d7ec63b0f6;hpb=73d6a1047f224613b617a0047c962c62e2de8d7d;p=sbcl.git

diff --git a/src/runtime/runtime.c b/src/runtime/runtime.c
index 55f4d50..908bd8c 100644
--- a/src/runtime/runtime.c
+++ b/src/runtime/runtime.c
@@ -271,10 +271,12 @@ main(int argc, char *argv[], char *envp[])
 	    core = copied_existing_filename_or_null(lookhere);
 	    free(lookhere);
 	} else {
-	    core = copied_existing_filename_or_null("/usr/lib/sbcl.core");
+	    putenv("SBCL_HOME=/usr/local/lib/sbcl/");
+	    core = copied_existing_filename_or_null("/usr/local/lib/sbcl/sbcl.core");
 	    if (!core) {
+		putenv("SBCL_HOME=/usr/lib/sbcl/");
 		core =
-		    copied_existing_filename_or_null("/usr/local/lib/sbcl.core");
+		    copied_existing_filename_or_null("/usr/lib/sbcl/sbcl.core");
 	    }
 	}
 	if (!core) {