From 8d9a9e8cbf7b06a9d574158f222bbd9bb0fbc820 Mon Sep 17 00:00:00 2001
From: goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac>
Date: Sun, 23 Apr 2000 21:05:01 +0000
Subject: Only active thorns should have their variables registered.

Tom


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

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

diff --git a/lib/sbin/GridFuncStuff.pl b/lib/sbin/GridFuncStuff.pl
index e1a167e4..49b913d6 100644
--- a/lib/sbin/GridFuncStuff.pl
+++ b/lib/sbin/GridFuncStuff.pl
@@ -108,7 +108,9 @@ sub CreateVariableBindings
 
   foreach $thorn (split(" ",$rhinterface_db->{"THORNS"}))
   {
-    $dataout .= "  CactusBindingsVariables_$thorn"."_Initialise();\n";
+    $dataout .= "  if(CCTK_IsThornActive(\"$thorn\"))\n  {\n";
+    $dataout .= "    CactusBindingsVariables_$thorn"."_Initialise();\n";
+    $dataout .= "  }\n";
   }
  
   $dataout .= "  return 0;\n}\n\n";
-- 
cgit v1.2.3