Lines Matching defs:button
101 (defun dwarf-insert-substructure-button (die)
119 (dwarf-insert-substructure-button die))))
121 ;; Called when a button is pressed.
123 (defun dwarf-die-button-action (button)
124 (let* ((die (button-get button 'die))
131 (is-ref (button-get button 'die-ref)))
139 (dwarf-insert-substructure-button die))))
141 ;; Button definition.
142 (define-button-type 'dwarf-die-button
144 'action #'dwarf-die-button-action)
165 (make-text-button b-start b-end :type 'dwarf-die-button
174 (make-text-button b-start b-end :type 'dwarf-die-button
Indexes created Wed May 06 00:24:28 UTC 2026