From 48feb34dc22cd0db21f3caca703c3d9667fef412 Mon Sep 17 00:00:00 2001
From: keenanlang <klang@aps.anl.gov>
Date: Fri, 20 Mar 2015 21:39:01 +0000
Subject: [PATCH] Quick fix, wasn't correctly storing TOP
---
release.pl | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/release.pl b/release.pl
index 260c75f..64d9fe0 100644
--- a/release.pl
+++ b/release.pl
@@ -32,8 +32,6 @@ sub Parse
{
my ($file, $applications) = @_;
- local $top;
-
if (-r "$file")
{
open(my $fh, "$file") or die "Cannot open $file\n";
@@ -115,7 +113,9 @@ sub Parse
}
}
-my $applications = {TOP => $top};
+my $applications;
+
+$applications{"TOP"} = $top;
if ($ENV{GATEWAY} ne "")
{
--
GitLab