Reversed some changes I had made to common blocks which didn't help

git-svn-id: http://svn.cactuscode.org/flesh/trunk@390 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 2 insertions, 4 deletions

diff --git a/lib/sbin/create_fortran_stuff.pl b/lib/sbin/create_fortran_stuff.pl
index ec89a4bc..10790e8a 100644
--- a/lib/sbin/create_fortran_stuff.pl
+++ b/lib/sbin/create_fortran_stuff.pl
@@ -147,8 +147,7 @@ sub CreateFortranCommonDeclaration
     }
     else
     {
-      $line = "$type_string $parameter";
-     # $line = "$type_string $alias_names[$n]";
+      $line = "$type_string $alias_names[$n]";
     }
 
     push(@data, $line);
@@ -159,8 +158,7 @@ sub CreateFortranCommonDeclaration
     }
     else
     {
-      #$definition .= "$sepchar$alias_names[$n]";
-      $definition .= "$sepchar$parameter";
+      $definition .= "$sepchar$alias_names[$n]";
     }