From e971284f7f3a187f443db2fdbd59d51643a216db Mon Sep 17 00:00:00 2001 From: Sascha Wildner Date: Mon, 10 Jul 2006 23:07:45 +0000 Subject: [PATCH] Match revision separator only if preceded by a newline. This prevents the script from choking on CVS ---------------------------------------------------------------------- lines accidentally left in commit messages. perl-clue: corecode --- tools/tools/commitsdb/make_commit_db | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tools/tools/commitsdb/make_commit_db b/tools/tools/commitsdb/make_commit_db index 078b5c43ad..67b42d861f 100644 --- a/tools/tools/commitsdb/make_commit_db +++ b/tools/tools/commitsdb/make_commit_db @@ -1,7 +1,7 @@ #!/usr/bin/perl -w # $FreeBSD: src/tools/tools/commitsdb/make_commit_db,v 1.2 2002/10/17 16:29:26 joe Exp $ -# $DragonFly: src/tools/tools/commitsdb/make_commit_db,v 1.3 2006/07/10 20:34:47 swildner Exp $ +# $DragonFly: src/tools/tools/commitsdb/make_commit_db,v 1.4 2006/07/10 23:07:45 swildner Exp $ # This script walks the tree from the current directory # and spits out a database generated by md5'ing the cvs log @@ -65,7 +65,7 @@ sub parse_log_message { close LOG; # Split the log into revisions. - my @entries = split /----------------------------\n/, $log; + my @entries = split /(?<=\n)----------------------------\n/, $log; # Throw away the first entry. shift @entries; -- 2.41.0