Commit 40a0fa09 authored by Dave Cooper's avatar Dave Cooper
Browse files

don't call restart-init-function in restart-app-function

.. if it doesn't exist
parent 48f5e388
Pipeline #7312 passed with stages
in 5 minutes and 43 seconds
......@@ -183,7 +183,8 @@ This function will be run in the initiating image after the build is finished."
(toplevel-function (when (the restart-app-function)
`(lambda()
(gendl::initialize :startup-banner? t)
(funcall #',(the restart-init-function))
,(when (the restart-init-function)
`(funcall #',(the restart-init-function)))
(funcall #',(the restart-app-function)))))
#+nil
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment