$_->{Button} = $colors_pane->Button
      (-width => 20,#this is what I added
           -text => $_->{Name},
         -background => $_->{Name},
         -foreground => $fg,
       );
      }