(in-package :custom)
(use-package :OLI)

;;--------------------------------------------------------------------------*

(sd-defdialog 'dc4-anno-gewindelinien-umfaerben-dialog
:dialog-title "Gewindelinien umfaerben"
:dialog-control :sequential
:ok-action
   '(sd-execute-annotator-command :cmd "CHANGE_COLOR RED SELECT GLOBAL INFOS 'DOCU_THREAD_LIN' AND GLOBAL YELLOW CONFIRM END")
)