d/freebsd-nq
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

- Fix issue when X-FreeBSD-CVS-Branch is not HEAD.

Browse Source 
Submitted by:	jkim
Approved by:	jkim
This commit is contained in:
Florent Thoumie 2006-01-13 00:47:42 +00:00
parent d7dca9034c
commit 72e8069dc7
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tools/tools/mfc/mfc.pl
View File

@ -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 = "0.4.3";
my $version = "0.4.4";
my %opt;
my $commit_author;
my $commit_date;
@ -125,6 +125,10 @@ sub previous_revision($)
return 0 if ($rev =~ /^1\.1$/);
@rev = split '\.', $rev;
return undef unless @rev;
if (($#rev % 2) != 1) {
pop @rev;
return join ".", @rev;
}
if ($rev[-1] == 1) {
pop @rev;
return &previous_revision(join ".", @rev);