From 7d4d9a2a6a26d54f4d8f840708b5d44105ed45d6 Mon Sep 17 00:00:00 2001
From: Sandro Santilli <strk@kbt.io>
Date: Tue, 20 Aug 2019 09:24:39 +0000
Subject: [PATCH] Fix perl syntax

Can't "last" outside a loop block ...

git-svn-id: http://svn.osgeo.org/postgis/trunk@17733 b70326c6-7e19-0410-871a-916f4a2858ee
---
 regress/run_test.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/regress/run_test.pl b/regress/run_test.pl
index b120c89f1..50abf466b 100755
--- a/regress/run_test.pl
+++ b/regress/run_test.pl
@@ -1367,7 +1367,7 @@ sub prepare_spatial_extensions
 
 	if ( $OPT_WITH_SFCGAL )
 	{
-		do {
+		do {{
 			my $sql = "CREATE EXTENSION postgis_sfcgal";
 			if ( $OPT_UPGRADE_FROM ) {
 				if ( semver_lessthan($OPT_UPGRADE_FROM, "2.2.0") )
@@ -1387,7 +1387,7 @@ sub prepare_spatial_extensions
 				fail "Error encountered creating EXTENSION POSTGIS_SFCGAL", $REGRESS_LOG;
 				die;
 			}
-		} while (0);
+		}} while (0);
 	}
 
  	return 1;
-- 
2.49.0