clog-gui-template

This commit is contained in:
David Botton 2021-02-28 09:01:56 -05:00
parent 5213080e83
commit 1f17d30c46
3 changed files with 53 additions and 2 deletions

View file

@ -15,7 +15,7 @@
(create-div (window-content win) :content n))))
(defun on-file-browse (obj)
(let* ((win (create-gui-window obj :title "Browse")))
(let ((win (create-gui-window obj :title "Browse")))
(create-child (window-content win)
"<iframe style='width:100%;height:98%;' src='https://common-lisp.net/'></iframe>")))