This commit is contained in:
David Botton 2021-01-20 13:48:28 -05:00
parent fb71ff846c
commit feaa038eeb

View file

@ -32,7 +32,7 @@
(gethash "/" *url-to-on-new-window*)))) (gethash "/" *url-to-on-new-window*))))
(if on-new-window (if on-new-window
(funcall on-new-window body) (funcall on-new-window body)
(put-br (html-document win) "No route to on-new-window"))))) (put-br (html-document body) "No route to on-new-window")))))
(defun initialize (on-new-window-handler (defun initialize (on-new-window-handler
&key &key