From 503d772b53d1ea9228952c3c79ec61f7df7cb836 Mon Sep 17 00:00:00 2001 From: Quincey Koziol Date: Wed, 6 May 1998 12:13:36 -0500 Subject: [PATCH] [svn-r391] Testing CVS perl log script, ignore this message --- bin/versinc | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/bin/versinc b/bin/versinc index 5b0fb3d784..d88da51e98 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";