diff options
author | Bas Zoetekouw <bas> | 2008-10-06 20:16:37 +0000 |
---|---|---|
committer | Bas Zoetekouw <bas> | 2008-10-06 20:16:37 +0000 |
commit | d03563d3f1d6c45da7d1575b5a24e6299ce0da5d (patch) | |
tree | a15a6a8e0b094c1b6ca942c5987eae6375da4284 /check_desc_trans.pl | |
parent | eba90c822e98249c771c1b67c5dd49e8418e7960 (diff) |
Add -c option that disables colour in output
CVS version numbers
check_desc_trans.pl: 1.8 -> 1.9
Diffstat (limited to 'check_desc_trans.pl')
-rwxr-xr-x | check_desc_trans.pl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/check_desc_trans.pl b/check_desc_trans.pl index cf249bf0193..4311458ec64 100755 --- a/check_desc_trans.pl +++ b/check_desc_trans.pl @@ -44,6 +44,13 @@ use Local::Util 'uniq'; use strict; use warnings; +# see if -c was specified +if ( $ARGV[0] eq '-c' ) +{ + shift @ARGV; + $ENV{'ANSI_COLORS_DISABLED'} = '1'; +} + # Get language configuration my $language; if ( $ARGV[0] ) |