r43746 - /scripts/KGB/server/KGB
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Sat Sep 5 18:14:53 UTC 2009
Author: dmn
Date: Sat Sep 5 18:14:49 2009
New Revision: 43746
URL: http://svn.debian.org/wsvn/?sc=1&rev=43746
Log:
fix branch/module colourization
Modified:
scripts/KGB/server/KGB
Modified: scripts/KGB/server/KGB
URL: http://svn.debian.org/wsvn/scripts/KGB/server/KGB?rev=43746&op=diff
==============================================================================
--- scripts/KGB/server/KGB (original)
+++ scripts/KGB/server/KGB Sat Sep 5 18:14:49 2009
@@ -385,12 +385,12 @@
my $repo_head = "\002$repo_id\017:";
my $author_string = "\00303$author\017";
- $author_string .= " \004$branch\017" if defined($branch);
+ $author_string .= " \00305$branch\017" if defined($branch);
my @string = "$repo_head $author_string * r\002$rev\017 $log[0]";
foreach(1..$#log) {
push @string, "$repo_head $log[$_]";
}
- $path_string = "\004$module\017/$path_string" if defined($module);
+ $path_string = "\00306$module\017/$path_string" if defined($module);
push @string, "$repo_head $path_string";
my @tmp;
# Standard says 512 (minus \r\n), anyway that's further trimmed when
More information about the Pkg-perl-cvs-commits
mailing list