From 62ab7f1b8e6fd586220c7f0f7a333024ad033a59 Mon Sep 17 00:00:00 2001
From: flz <flz@FreeBSD.org>
Date: Wed, 25 Jan 2006 23:47:12 +0000
Subject: - Fix infinite loop in strip_log(). - Remove useless variable.

Submitted by:	jkim
Approved by:	jkim
---
 tools/tools/mfc/mfc.pl | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'tools')

diff --git a/tools/tools/mfc/mfc.pl b/tools/tools/mfc/mfc.pl
index 8cdeea0..5448021 100644
--- a/tools/tools/mfc/mfc.pl
+++ b/tools/tools/mfc/mfc.pl
@@ -56,7 +56,7 @@ my $mfchome = $MFCHOME ? $MFCHOME : "/var/tmp/mfc";
 my $mfclogin = $MFCLOGIN ? $MFCLOGIN : "";
 my $cvsroot = $MFCCVSROOT ? $MFCCVSROOT : ':pserver:anoncvs@anoncvs.at.FreeBSD.org:/home/ncvs';
 
-my $version = "1.0.1";
+my $version = "1.0.2";
 my %opt;
 my $commit_author;
 my $commit_date;
@@ -75,8 +75,6 @@ my $cdiff;
 my $answer;
 my $mfc_func = \&mfc_headers;
 
-my $first_log_line = 1;
-
 sub init()
 {
 	# Look for pre-requisites.
@@ -286,7 +284,7 @@ sub mfc_revisions($)
 sub strip_log(@) {
 	my $tmp;
 
-	while ($logmsg[$#logmsg] =~ /^\s*$/ or $logmsg[$#logmsg] =~ /^\s\s\w+(\s\w+)*:\s+\w+(\s+\w+)*/) {
+	while ($#logmsg >= 0 and ($logmsg[$#logmsg] =~ /^\s*$/ or $logmsg[$#logmsg] =~ /^\s\s\w+(\s\w+)*:\s+\w+(\s+\w+)*/)) {
 		$tmp = pop(@logmsg);
 		$tmp =~ s/^\s*//;
 		chomp($tmp);
-- 
cgit v1.1