|
Revision 111, 353 bytes
(checked in by ashley, 10 months ago)
|
|
Split requestors off into %rebgui-requestors.r
Requestors and functions now appear in their respective parent objects
Added new on-resize handler
tab-panel.r and chat.r fixes
RebDOC.r enhancements
|
| Line | |
|---|
| 1 | set-text-color: make function! [
|
|---|
| 2 | "Set and show a widget's font color attribute."
|
|---|
| 3 | face [object!]
|
|---|
| 4 | color [tuple! none!]
|
|---|
| 5 | /no-show "Don't show"
|
|---|
| 6 | ][
|
|---|
| 7 | unless string? face/text [exit]
|
|---|
| 8 | all [
|
|---|
| 9 | widgets/(face/type)/font
|
|---|
| 10 | face/font = widgets/(face/type)/font
|
|---|
| 11 | face/font: make face/font []
|
|---|
| 12 | ]
|
|---|
| 13 | face/font/color: color
|
|---|
| 14 | unless no-show [show face]
|
|---|
| 15 | ] |
|---|
