From 59835445477cc7308f775d9ca611d113c57304de Mon Sep 17 00:00:00 2001
From: Albert Cheng <acheng@hdfgroup.org>
Date: Wed, 20 Dec 2000 12:11:19 -0500
Subject: [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.

---
 bin/h5vers | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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";
-- 
cgit v0.12