mirrors/clog
1
Fork 0
mirror of https://github.com/rabbibotton/clog.git synced 2025-12-07 11:10:18 -08:00
Code Issues Projects Releases Wiki Activity

get rid of prompts for dist update

Browse source
This commit is contained in:
David Botton 2024-04-01 00:01:14 -04:00
parent 42e92b86c1
commit a1ba1c9fc9
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
tools/clog-builder.lisp
View file

@ -312,9 +312,9 @@ clog-builder window.")
"CLOG Update"
"Results of update will apear when completed."
:color-class "w3-green" :time-out 2))
(let ((results (capture-eval "(ql:update-all-dists)" :clog-obj body)))
(let ((results (capture-eval "(ql:update-all-dists :prompt nil)" :clog-obj body)))
(if *app-mode*
(on-open-file body :title "CLOG Updated - Close builder, rerun make.bat/make and rerun."
(on-open-file body :title "CLOG Updated - Close builder, rerun make/update and rerun."
:title-class "w3-green w3-animate-top"
:text results)
(on-open-file body :title "CLOG Updated - Close builder, rerun (ql:quickload :clog/tools)(clog-tools:clog-builder)"