sort keys for option --all

diff --git a/bin/color.pl b/bin/color.pl
index b732c287f84dd375f0555f1468c5783117201b21..053ca6121e18c7cb9a02f7346f63ba8f492ef0b9 100755 (executable)
--- a/bin/color.pl
+++ b/bin/color.pl
@@ -101,7 +101,7 @@ if ($Opt{all}) {
 # NB 08.08.14   print map { "$BG{$_}\n"
 
   print "Forgrounds:\n";
-  for my $fg (keys %FG) {
+  for my $fg (sort keys %FG) {
     my $fg_num = $FG{$fg};
 
     printf "%17s", "$fg ($fg_num) | ";
@@ -115,7 +115,7 @@ if ($Opt{all}) {
   }
 
   print "\nBackgrounds:\n";
-  for my $bg (keys %BG) {
+  for my $bg (sort keys %BG) {
     my $bg_num = $BG{$bg};
 
     printf "%17s", "$bg ($bg_num) | ";