summaryrefslogtreecommitdiffstats
path: root/cervisia/change_colors.pl
diff options
context:
space:
mode:
Diffstat (limited to 'cervisia/change_colors.pl')
-rw-r--r--cervisia/change_colors.pl31
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 $_;
+}