| … | … | ||
|---|---|---|---|
| 105 | our $INVR; | 105 | our $INVR; |
| 106 | our $INVR_LBL; | 106 | our $INVR_LBL; |
| 107 | our $OPENCONT; | 107 | our $OPENCONT; |
| 108 | 108 | ||
| 109 | sub status { | 109 | sub status { |
| 110 | $STATUSBOX->add ($_[0], pri => -10, group => "status", timeout => 20, fg => [1, 1, 0, 1]); | 110 | $STATUSBOX->add (CFClient::UI::Label::escape $_[0], pri => -10, group => "status", timeout => 20, fg => [1, 1, 0, 1]); |
| 111 | } | 111 | } |
| 112 | 112 | ||
| 113 | sub debug { | 113 | sub debug { |
| 114 | $DEBUG_STATUS->set_text ($_[0]); | 114 | $DEBUG_STATUS->set_text ($_[0]); |
| 115 | my ($w, $h) = $DEBUG_STATUS->size_request; | 115 | my ($w, $h) = $DEBUG_STATUS->size_request; |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |