mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-06 02:30:42 -08:00
Code Issues Projects Releases Wiki Activity

html pretty printing

Browse source
This commit is contained in:
David Botton 2024-07-02 21:17:30 -04:00
parent ecc09b01c4
commit 61a864bfee
7 changed files with 9017 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

3
tools/clog-builder.lisp
View file

@ -382,6 +382,9 @@ clog-builder window.")
(make-instance 'console-in-stream :clog-obj body)))
(clog-gui-initialize body :use-clog-debugger t :standard-output (stdout app))
(add-class body *builder-window-desktop-class*)
(load-script (html-document body) "/js/beautify.js" :load-only-once t)
(load-script (html-document body) "/js/beautify-css.js" :load-only-once t)
(load-script (html-document body) "/js/beautify-html.js" :load-only-once t)
(when *password-protect*
(input-dialog body "Enter password:" (lambda (result)
(unless (equal result (if (functionp *password-protect*)