mirror of
https://github.com/rabbibotton/clog.git
synced 2025-12-06 10:40:45 -08:00
clog-gui-template
This commit is contained in:
parent
5213080e83
commit
1f17d30c46
3 changed files with 53 additions and 2 deletions
|
|
@ -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>")))
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue