From: Sandro Santilli <strk@keybit.net>
Date: Thu, 19 Aug 2004 10:52:28 +0000 (+0000)
Subject: Fixed a bug in ascii dump "CREATE OPERATOR" scan
X-Git-Tag: pgis_0_9_1~104
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=5165c72c40330af1a32e3321976ba3d719173adc;p=postgis

Fixed a bug in ascii dump "CREATE OPERATOR" scan


git-svn-id: http://svn.osgeo.org/postgis/trunk@690 b70326c6-7e19-0410-871a-916f4a2858ee
---

diff --git a/utils/postgis_restore.pl b/utils/postgis_restore.pl
index 417bd6f19..af7c21efb 100644
--- a/utils/postgis_restore.pl
+++ b/utils/postgis_restore.pl
@@ -150,7 +150,7 @@ while( my $line = <INPUT>)
 				$type = $1;
 				last;
 			}
-			last if $subline =~ /\);/;
+			last if $subline =~ /;[\t ]*$/;
 		}
 		if ( $type eq undef )
 		{
@@ -223,7 +223,7 @@ while( my $line = <INPUT>)
 		my $rarg = undef;
 		while( my $subline = <INPUT>)
 		{
-			last if $subline =~ /\);/;
+			last if $subline =~ /;[\t ]*$/;
 			if ( $subline =~ /leftarg *= *([^ ,]*)/i )
 			{
 				$larg=lc($1);
@@ -465,7 +465,7 @@ while( my $line = <INPUT> )
 		while( my $subline = <INPUT>)
 		{
 			push(@sublines, $subline);
-			last if $subline =~ /\);/;
+			last if $subline =~ /;[\t ]*$/;
 			if ( $subline =~ /leftarg *= *([^ ,]*)/i )
 			{
 				$larg=lc($1);
@@ -485,6 +485,7 @@ while( my $line = <INPUT> )
 		}
 		print "KEEPING OP $id\n" if $DEBUG;
 		print OUTPUT @sublines;
+		next;
 	}
 
 	print OUTPUT $line;