- allowed a custom init.lisp file in the config user home.

2021-08-28 11:28:24 +02:00 · 2021-08-28 11:28:24 +02:00 · a4d58b665b
parent d8d5b9c100
commit a4d58b665b
1 changed files with 3 additions and 1 deletions
--- a/src/main.lisp
+++ b/src/main.lisp
@ -123,7 +123,9 @@ etc.) happened"
  (db-utils:with-ready-database (:connect nil)
    (complete:initialize-complete-username-cache)
    (handler-case
-        (modules:load-module +starting-init-file+)
+        (progn
+          (modules:load-sys-module +starting-init-file+)
+          (modules:load-module +starting-init-file+))
      (error (e)
        (croatoan:end-screen)
        (format *error-output* "~a~%" e)