From fdee826be35e4ef8d27530020ebeffbeed8725e4 Mon Sep 17 00:00:00 2001
From: Eric Bollengier <eric@eb.homelinux.org>
Date: Sun, 14 Feb 2010 17:12:17 +0100
Subject: [PATCH] regress: fix extract_resource

---
 regress/scripts/functions.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/regress/scripts/functions.pm b/regress/scripts/functions.pm
index bfabe11049..d5a0244eea 100644
--- a/regress/scripts/functions.pm
+++ b/regress/scripts/functions.pm
@@ -98,7 +98,7 @@ sub extract_resource
     open(FP, $file) or die "Can't open $file";
     my $content = join("", <FP>);
     
-    if ($content =~ m/(^$type {.+?Name\s*=\s*"?$name"?.+?^})/ms) {
+    if ($content =~ m/(^$type {[^}]+?Name\s*=\s*"?$name"?[^}]+?^})/ms) {
         print $1, "\n";
     }
 
-- 
2.39.5