diff options
| author | Thomas White <taw@physics.org> | 2018-06-28 11:35:34 +0200 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2018-06-28 11:36:12 +0200 |
| commit | 960e33e15dacb42e107100900ccd4c23ca9d5fa6 (patch) | |
| tree | ada3e2a65f0d831738958820d4070639a54a3854 | |
| parent | 8a0f5249127dc2fab6d4d34611c0002b5cde2b8e (diff) | |
Fix check-near-bragg
| -rwxr-xr-x | scripts/check-near-bragg | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/scripts/check-near-bragg b/scripts/check-near-bragg index 7fd7d013..632e1285 100755 --- a/scripts/check-near-bragg +++ b/scripts/check-near-bragg @@ -15,7 +15,9 @@ if ( !($args eq "") ) { printf("Using default arguments for hdfsee: %s\n", $args); } -open(FH, $ARGV[0]); +my $file = $ARGV[0]; + +open(FH, $file); open(TMP, "> list.tmp"); my $statbuf = stat($file); |