diff options
author | Quincey Koziol <koziol@hdfgroup.org> | 1998-05-06 17:13:36 (GMT) |
---|---|---|
committer | Quincey Koziol <koziol@hdfgroup.org> | 1998-05-06 17:13:36 (GMT) |
commit | 503d772b53d1ea9228952c3c79ec61f7df7cb836 (patch) | |
tree | c69a9c8f1956ad3ca0853caa288f6b6ff23db2c3 | |
parent | 6caf498fc5aa59bb16ba4c30b599db2797805428 (diff) | |
download | hdf5-503d772b53d1ea9228952c3c79ec61f7df7cb836.zip hdf5-503d772b53d1ea9228952c3c79ec61f7df7cb836.tar.gz hdf5-503d772b53d1ea9228952c3c79ec61f7df7cb836.tar.bz2 |
[svn-r391] Testing CVS perl log script, ignore this message
-rw-r--r-- | bin/versinc | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/bin/versinc b/bin/versinc index 5b0fb3d..d88da51 100644 --- a/bin/versinc +++ b/bin/versinc @@ -1,9 +1,11 @@ #! /usr/local/bin/perl -w require 5.003; +use Cwd; -$hdr = "../src/H5public.h"; -$bak = "../src/H5public.h~"; -$tmp = "../src/H5public.$$"; +($cwd)=(cwd()=~m#(.*?hdf5)/.*#) +$hdr = "$cwd/src/H5public.h"; +$bak = "$cwd/src/H5public.h~"; +$tmp = "$cwd/src/H5public.$$"; # Open files open OLD, $hdr or die "cannot read $hdr"; |