From: Eric Bollengier <eric@eb.homelinux.org>
Date: Sun, 14 Feb 2010 16:12:17 +0000 (+0100)
Subject: regress: fix extract_resource
X-Git-Tag: Release-5.2.1~1745
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=e34f74fc815dd1d362c7028fc03d4ddbe90d6d16;p=bacula%2Fbacula

regress: fix extract_resource
---

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";
     }