From c112c26f680728feab220393c7c502f759cc72df Mon Sep 17 00:00:00 2001
From: allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac>
Date: Tue, 2 Mar 1999 16:29:30 +0000
Subject: Removed some speech marks which seem to be surplus to requirements
 ...

Gab


git-svn-id: http://svn.cactuscode.org/flesh/trunk@373 17b73243-c579-4c4c-a9d2-2d5706c11dac
---
 lib/sbin/create_c_stuff.pl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

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

diff --git a/lib/sbin/create_c_stuff.pl b/lib/sbin/create_c_stuff.pl
index e4ad29c4..af68a0da 100644
--- a/lib/sbin/create_c_stuff.pl
+++ b/lib/sbin/create_c_stuff.pl
@@ -207,7 +207,10 @@ sub set_parameter_code
     {
       $quoted_range = $parameter_database{"\U$implementation $parameter\E range $range range"};
 
-      $quoted_range =~ s:\":\\\":g;
+      #$quoted_range =~ s:\":\\\":g;
+      $quoted_range =~ s:\"::g;
+      $quoted_range =~ s:^\s*::;
+      $quoted_range =~ s:\s*$::;
 
       $line .= ",\"".$quoted_range."\"";
 
@@ -456,7 +459,7 @@ sub order_params
       push(@string_params, $parameter);
     }
     elsif($type eq "LOGICAL" ||
-	  $type eq "INTEGER")
+    	  $type eq "INTEGER")
     {
       push(@int_params, $parameter);
     }
-- 
cgit v1.2.3