From: Steven Schubiger Date: Mon, 9 Dec 2013 17:11:44 +0000 (+0100) Subject: Sort color names elsewhere X-Git-Tag: v0.53~6 X-Git-Url: http://git.refcnt.org/?a=commitdiff_plain;h=9a1c3657772d04b82aee08b30af9c53e2f2c7a3e;p=colorize.git Sort color names elsewhere --- diff --git a/colorize.1 b/colorize.1 index 4fa99fd..db44d8f 100644 --- a/colorize.1 +++ b/colorize.1 @@ -1,4 +1,4 @@ -.TH COLORIZE 1 "2013-10-20" "colorize v0.52" "User Commands" +.TH COLORIZE 1 "2013-12-09" "colorize v0.52" "User Commands" .SH NAME colorize \- colorize text with escape sequences .SH SYNOPSIS @@ -15,8 +15,8 @@ escape sequences (and also vice versa, i.e. cleaning text from sequences) and prints resulting output to the terminal. .PP When colorizing text, (foreground) and eventually (background) may be either -one of following color values: none, black, red, green, yellow, blue, cyan, -magenta, white, default or random. First character of color name in upper +one of following color values: none, black, red, green, yellow, blue, magenta, +cyan, white, default or random. First character of color name in upper case denotes increased intensity, whereas for lower case colors will be of normal intensity. If "none" is chosen, no escape sequences will be emitted. .PP diff --git a/test.pl b/test.pl index 49a0cf3..01d77ed 100755 --- a/test.pl +++ b/test.pl @@ -169,7 +169,7 @@ SKIP: { Colors ====== EOT - foreach my $color (qw(none black red green yellow blue cyan magenta white default random)) { + foreach my $color (qw(none black red green yellow blue magenta cyan white default random)) { system("echo $color | $program $color"); next if $color eq 'none'; my $bold_color = ucfirst $color;