Fixed bug reported by klaus F�rster
authorSandro Santilli <strk@keybit.net>
Wed, 13 Jul 2005 14:26:47 +0000 (14:26 +0000)
committerSandro Santilli <strk@keybit.net>
Wed, 13 Jul 2005 14:26:47 +0000 (14:26 +0000)
git-svn-id: http://svn.osgeo.org/postgis/trunk@1815 b70326c6-7e19-0410-871a-916f4a2858ee

utils/create_undef.pl

index 499d258b403a23b7ca50ec2c5d90d553557b6fd6..a6c020567a2163f3b142a521068e4f4ceec615c7 100755 (executable)
@@ -1,3 +1,6 @@
+eval "exec perl -w $0 $@"
+       if (0);
+
 # perl create_undef.pl <postgis.sql>
 # creates a new sql script to delete all the postgis functions et al.
 
@@ -140,7 +143,7 @@ print "-- Drop all types.\n";
 
 foreach my $type (@types)
 {
-       if ($type =~ /create type ([^(]+)/i )
+       if ($type =~ /create type (\w+)/i )
        {
                if ( $version ge "73" ) 
                {