summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAlbert Cheng <acheng@hdfgroup.org>2000-12-20 17:11:19 (GMT)
committerAlbert Cheng <acheng@hdfgroup.org>2000-12-20 17:11:19 (GMT)
commit59835445477cc7308f775d9ca611d113c57304de (patch)
tree9d096bae35b647c1c7cd40caf599cf2257957361
parenta697b6d48822a4e5f76393f870f11f8eaa02fa1e (diff)
downloadhdf5-59835445477cc7308f775d9ca611d113c57304de.zip
hdf5-59835445477cc7308f775d9ca611d113c57304de.tar.gz
hdf5-59835445477cc7308f775d9ca611d113c57304de.tar.bz2
[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.
-rwxr-xr-xbin/h5vers2
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";