diff options
Diffstat (limited to 'cervisia/change_colors.pl')
-rw-r--r-- | cervisia/change_colors.pl | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/cervisia/change_colors.pl b/cervisia/change_colors.pl new file mode 100644 index 00000000..6f455251 --- /dev/null +++ b/cervisia/change_colors.pl @@ -0,0 +1,31 @@ +#!/usr/bin/perl + + +while(<>) +{ + ($key) = ($_ =~ /([^=]*)=(.*)$/); + ($value) = ($_ =~ /^[^=]*=(.*)$/); + + if( $key eq "Conflict" and $value eq "255,100,100" ) + { + print "# DELETE " . $key . "\n"; + print $key . "=255,130,130\n"; + next; + } + + if( $key eq "LocalChange" and $value eq "190,190,237" ) + { + print "# DELETE " . $key . "\n"; + print $key . "=130,130,255\n"; + next; + } + + if( $key eq "RemoteChange" and $value eq "255,240,190" ) + { + print "# DELETE " . $key . "\n"; + print $key . "=70,210,70\n"; + next; + } + + print $_; +} |