]>
Commit | Line | Data |
---|---|---|
35b0d6f2 AM |
1 | From e5654a5591884b92633c7785f325626711e7f7aa Mon Sep 17 00:00:00 2001 |
2 | From: Paul Eggert <eggert@cs.ucla.edu> | |
3 | Date: Tue, 29 Jan 2013 13:46:48 -0800 | |
4 | Subject: [PATCH] autoscan: port to perl 5.17 | |
5 | ||
6 | * bin/autoscan.in (scan_sh_file): Escape '{'. This avoids a | |
7 | feature that is deprecated in Perl 5.17. Reported by Ray Lauff in | |
8 | <http://lists.gnu.org/archive/html/bug-autoconf/2013-01/msg00059.html>. | |
9 | --- | |
10 | bin/autoscan.in | 2 +- | |
11 | 1 file changed, 1 insertion(+), 1 deletion(-) | |
12 | ||
13 | diff --git a/bin/autoscan.in b/bin/autoscan.in | |
14 | index 993a750..db1df79 100644 | |
15 | --- a/bin/autoscan.in | |
16 | +++ b/bin/autoscan.in | |
17 | @@ -358,7 +358,7 @@ sub scan_sh_file ($) | |
18 | { | |
19 | # Strip out comments and variable references. | |
20 | s/#.*//; | |
21 | - s/\${[^\}]*}//g; | |
22 | + s/\$\{[^\}]*}//g; | |
23 | s/@[^@]*@//g; | |
24 | ||
25 | # Tokens in the code. | |
26 | -- | |
27 | 2.1.0 | |
28 |