From e5654a5591884b92633c7785f325626711e7f7aa Mon Sep 17 00:00:00 2001

From: Paul Eggert <eggert@cs.ucla.edu>

Date: Tue, 29 Jan 2013 13:46:48 -0800

Subject: [PATCH] autoscan: port to perl 5.17

* bin/autoscan.in (scan_sh_file): Escape '{'.  This avoids a

feature that is deprecated in Perl 5.17.  Reported by Ray Lauff in

<http://lists.gnu.org/archive/html/bug-autoconf/2013-01/msg00059.html>.

---

 bin/autoscan.in | 2 +-

 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/autoscan.in b/bin/autoscan.in

index 993a750..db1df79 100644

--- a/bin/autoscan.in

+++ b/bin/autoscan.in

@@ -358,7 +358,7 @@ sub scan_sh_file ($)

     {

       # Strip out comments and variable references.

       s/#.*//;

-      s/\${[^\}]*}//g;

+      s/\$\{[^\}]*}//g;

       s/@[^@]*@//g;

       # Tokens in the code.

-- 

2.1.0