tweaks to element

This commit is contained in:
David Botton 2022-01-31 19:56:02 -05:00
parent 9e91caeec5
commit 03213a1154
2 changed files with 18 additions and 3 deletions

View file

@ -624,7 +624,8 @@ of controls and double click to select control."
(placer (get-placer control))
(state (hiddenp placer)))
(setf (hiddenp placer) (not state))
(select-control control))))
(select-control control)
(on-populate-control-list-win content))))
;; drag and drop to change
(set-on-drag-over list-item (lambda (obj)(declare (ignore obj))()))
(set-on-drop list-item