From: Mischa POSLAWSKY <perl@shiar.org>
Date: Fri, 6 Sep 2019 22:18:29 +0000 (+0200)
Subject: shorthand -C to disable color
X-Git-Tag: v1.03~9
X-Git-Url: http://git.shiar.nl/barcat.git/commitdiff_plain/17a26cb76ab04c0cdd33acca2d64b3d3397456e4

shorthand -C to disable color

There is precedent for capitalisation to negate, along with +c which is not
supported by Getopt::Long.
---

diff --git a/graph b/graph
index 41d858a..8144868 100755
--- a/graph
+++ b/graph
@@ -16,6 +16,7 @@ sub podexit {
 my %opt;
 GetOptions(\%opt,
 	'color|c!',
+	'C' => sub { $opt{color} = 0 },
 	'interval|t:i',
 	'trim|length|l=s' => sub {
 		my ($optname, $optval) = @_;