From 960e33e15dacb42e107100900ccd4c23ca9d5fa6 Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Thu, 28 Jun 2018 11:35:34 +0200
Subject: Fix check-near-bragg

---
 scripts/check-near-bragg | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'scripts')

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);
-- 
cgit v1.2.3