blob: 79bfaad3dec3e18adb5c55f1530cc73e30793de2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
diff --git a/make-image.lisp.in b/make-image.lisp.in
index 121e9d6..2210242 100644
--- a/make-image.lisp.in
+++ b/make-image.lisp.in
@@ -2,7 +2,10 @@
(load "load-stumpwm.lisp")
-#-ecl (stumpwm:set-module-dir "@CONTRIB_DIR@")
+(setf asdf::*immutable-systems*
+ (uiop:list-to-hash-set (asdf:already-loaded-systems)))
+
+#-ecl (stumpwm:set-module-dir "@MODULE_DIR@")
#+sbcl
(sb-ext:save-lisp-and-die "stumpwm" :toplevel (lambda ()
|
