[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.

1 files changed, 1 insertions, 1 deletions

diff --git a/bin/h5vers b/bin/h5vers
index 02b7045..3b7a1e7 100755
--- a/bin/h5vers
+++ b/bin/h5vers
@@ -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";