[svn-r3164] Purpose:

Improvement
Description:
    The -i option used to increment the first number it finds in the
    SUBRELEASE string.  So, beta1-post0 becomes beta2-post0.
Solution:
    Changed to increment the last number it finds.  So,
    	beta1-post0 becomes beta1-post1.
Platforms tested:
    eirene and modi4.
This commit is contained in:
Albert Cheng 2000-12-20 12:11:19 -05:00
parent a697b6d488
commit 5983544547

View File

@ -182,7 +182,7 @@ if ($set) {
} elsif ($inc eq "annot") {
@newver[0,1,2] = @curver[0,1,2];
$newver[3] = $curver[3];
$newver[3] =~ s/(\d+)/$1+1/e or
$newver[3] =~ s/(\d+)\D*$/$1+1/e or
die "Annotation \"".$newver[3]."\" cannot be incremented.\n";
} else {
die "unknown increment field: $inc\n";