10 lines
175 B
Plaintext
10 lines
175 B
Plaintext
|
;; Widget options
|
||
|
|
|
||
|
|
(option 'add "*background" "red")
|
||
|
|
(option 'add "*Button.foreground" "white")
|
||
|
|
|
||
|
|
(button '.a :text "Press Me!")
|
||
|
|
(button '.b :text "And Me Too!")
|
||
|
|
(pack .a .b)
|
||
|
|
|