|
|
@@ -67,7 +67,7 @@ while (<STDIN>) {
|
|
|
# colorize changelog text
|
|
|
if (m/---------------+/s) {
|
|
|
$in->{-changelog} = 0;
|
|
|
- s/^([\s|\\\/o]\s*)(---+)\r?\n$/$1.("_" x 78)."\n"/oes;
|
|
|
+ s/^([\s|\\\/o]\s*)?(---+)\r?\n$/$1.("_" x 78)."\n"/oes;
|
|
|
}
|
|
|
s/^([\s|\\\/o]\s*)(.+)$/$1$color->{-positive}$2$color->{-none}/o if ($in->{-changelog});
|
|
|
$in->{-changelog} = 1 if (m/ChangeLog:\s*$/s);
|