From 0f32894d78d29b9d205ecfe4ee319a0f9112abee Mon Sep 17 00:00:00 2001
From: goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac>
Date: Wed, 25 Aug 2004 14:42:41 +0000
Subject: Fixing problem detected by perl -cw .

git-svn-id: http://svn.cactuscode.org/flesh/trunk@3854 17b73243-c579-4c4c-a9d2-2d5706c11dac
---
 lib/sbin/ConfigScriptParser.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/sbin/ConfigScriptParser.pl')

diff --git a/lib/sbin/ConfigScriptParser.pl b/lib/sbin/ConfigScriptParser.pl
index 457b17ce..7f2551f8 100644
--- a/lib/sbin/ConfigScriptParser.pl
+++ b/lib/sbin/ConfigScriptParser.pl
@@ -29,7 +29,7 @@ sub ParseConfigScript
   # Run the configuration script in the config_dir folder
   if ($lang ne '' && $script ne '')
   {
-    @data=`$lang $thorns{$thorn}/$script`;
+    @data=`$lang $thorns->{$thorn}/$script`;
   }
   $exit_value  = $? >> 8;
   $signal_num  = $? & 127;
-- 
cgit v1.2.3