mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2025-03-19 16:50:46 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r391] Testing CVS perl log script, ignore this message

Browse Source
This commit is contained in:
Quincey Koziol 1998-05-06 12:13:36 -05:00
parent 6caf498fc5
commit 503d772b53
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
bin/versinc
View File

@ -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";