dan/dunlin
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

remove duplicated code

Browse Source
This commit is contained in:
Daniel Barlow 2022-12-30 17:41:48 +00:00
parent fb834f496c
commit 36edd12c6e
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
command.fnl
View File

@ -148,9 +148,7 @@
(tset entry :on_activate (tset entry :on_activate
(fn [event] (fn [event]
(let [result (self:on-activate event.text)] (let [result (self:on-activate event.text)]
(set prompt.label (or result.prompt "")) (update-widget-state self result))))
(set entry.sensitive result.active)
(set entry.text (or result.default result.error "")))))
self)) self))