Differences

This shows you the differences between two versions of the page.

--- perl:ansi_color [2009/08/13 09:57] – Page moved from ansi_color to perl:ansi_color tkbletsc
+++ perl:ansi_color [2009/09/04 09:20] (current) – tkbletsc
@@ Line 30: / Line 30: @@
 	);
 	my $r = join(';',map {$colors{$_}} split(/\W+/,$c));
-	return $r ? "\e[${r}m" : '';
+	return length($r) ? "\e[${r}m" : '';
 }
 </code>