From a2ac1c79a548eddf314dcbb9588d5d7fc48f6bf5 Mon Sep 17 00:00:00 2001 From: Eric Bollengier Date: Tue, 20 Apr 2010 10:06:53 +0200 Subject: [PATCH] Tweak git2changelog for bweb --- bacula/release/git2changelog.pl | 15 +++++++++++++-- 1 file changed, 13 insertions(+), 2 deletions(-) diff --git a/bacula/release/git2changelog.pl b/bacula/release/git2changelog.pl index de65cfebd5..385f069154 100755 --- a/bacula/release/git2changelog.pl +++ b/bacula/release/git2changelog.pl @@ -4,6 +4,9 @@ ./git2changelog.pl Release-3.0.1..Release-3.0.2 + For bweb ReleaseNotes, use + FORBWEB=1 ./git2changelog.pl Release-3.0.1..Release-3.0.2 + =cut use strict; @@ -13,12 +16,20 @@ my $d=''; my $last_txt=''; my %bugs; my $refs = shift || ''; +my $for_bweb = $ENV{FORBWEB}?1:0; open(FP, "git log --no-merges --pretty=format:'%ct: %s' $refs|") or die "Can't run git log $!"; while (my $l = ) { # remove non useful messages - next if ($l =~ /(tweak|typo|cleanup|bweb:|regress:|again|.gitignore|fix compilation|technotes)/ixs); - next if ($l =~ /update (version|technotes|kernstodo|projects|releasenotes|version|home|release|todo|notes|changelog)/i); + next if ($l =~ /(tweak|typo|cleanup|regress:|again|.gitignore|fix compilation|technotes)/ixs); + next if ($l =~ /update (version|technotes|kernstodo|projects|releasenotes|version|home|release|todo|notes|changelog|tpl)/i); + + if ($for_bweb) { + next if ($l !~ /bweb/ixs); + $l =~ s/bweb: *//ig; + } else { + next if ($l =~ /bweb:/ixs); + } # keep list of fixed bugs if ($l =~ /#(\d+)/) { -- 2.39.5