diff options
| -rwxr-xr-x | greypool | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -80,13 +80,14 @@ sub parse_opts { "doc|help" => sub { exec("perldoc $0"); }, "man" => sub { exec("pod2man --stderr -s1 -cgreypool -r$VERSION $0"); }, "color|colour|c" => \$color_output, - "mono|no-color|no-colour|m" => sub { $color_output = 0; }, + "mono|no-color|no-colour|m" => sub { $color_output = 0; $mono = 1; }, "config-dir|C=s" => \$privdir, "quiet|q" => sub { $verbose = 0; }, ) or fatal("error in command line options (try --help)."); $html = 1 if $html_frag; $html = 0 if $csv_output; + $color_output = 1 if $html && !$mono; fatal "can't use -f/--force and -n/--cached together" if $force_download && $no_download; |