| … | |
… | |
| 1038 | ::message ({ |
1038 | ::message ({ |
| 1039 | fg => $fg, |
1039 | fg => $fg, |
| 1040 | markup => $_, |
1040 | markup => $_, |
| 1041 | type => $type, |
1041 | type => $type, |
| 1042 | extra => [@extra], |
1042 | extra => [@extra], |
| 1043 | color_flags => $color, #d# ugly, kill |
1043 | color_flags => $color, #d# ugly, kill |
| 1044 | }); |
1044 | }); |
| 1045 | |
1045 | |
| 1046 | $color &= ~NDI_CLEAR; # only clear once for multiline messages |
1046 | $color &= ~NDI_CLEAR; # only clear once for multiline messages |
| 1047 | # actually, this is an ugly design. _we_ should control the channels, |
1047 | # actually, this is an ugly design. _we_ should control the channels, |
| 1048 | # not some random other widget, as the channels are clearly protocol-specific. |
1048 | # not some random other widget, as the channels are clearly protocol-specific. |
