listbas: don't print duplicate color codes for "(" ops.

1 files changed, 1 insertions, 1 deletions

diff --git a/listbas.c b/listbas.c
index fe2cbd4..ee4c68c 100644
--- a/listbas.c
+++ b/listbas.c
@@ -422,7 +422,7 @@ void print_mixed_case(const char *name) {
 	while(( c = *name++)) {
 		if(c >= 'A' && c <= 'Z')
 			c |= 0x20;
-		if(color && c == '(') color_on(color_op);
+		if(color && c == '(' && cur_color != color_op) color_on(color_op);
 		outchr(c);
 	}
 }