- my $add = "$call-$spos-$shl";
- $scr->addstr(LINES()-4, 0, '-' x (COLS() - length $add));
+ my $add = "-$spos-$shl";
+ $scr->addstr(LINES()-4, 0, '-' x (COLS() - (length($call) + length($add))));
+ $scr->attrset($mycallcolor) if $has_colors;
+ $scr->addstr("$call");
+ $scr->attrset(COLOR_PAIR(0)) if $has_colors;