Contents of /trunk/automake/patches/automake-1.4-perl-dyn-call.patch
Parent Directory | Revision Log
Revision 2976 -
(show annotations)
(download)
Wed Aug 23 11:20:30 2017 UTC (7 years, 1 month ago) by niro
File size: 738 byte(s)
Wed Aug 23 11:20:30 2017 UTC (7 years, 1 month ago) by niro
File size: 738 byte(s)
-perl fixes
1 | at some point, a perl update broke this syntax. use a newer style that works |
2 | with at least perl-5.16. |
3 | |
4 | --- a/automake.in |
5 | +++ b/automake.in |
6 | @@ -983,7 +983,7 @@ sub finish_languages |
7 | |
8 | # Compute the function name of the finisher and then call it. |
9 | $name = 'lang_' . $lang . '_finish'; |
10 | - do $name (); |
11 | + &$name (); |
12 | } |
13 | |
14 | # If the project is entirely C++ or entirely Fortran 77, don't |
15 | @@ -1144,7 +1144,7 @@ sub handle_single_transform_list |
16 | # Found the language, so see what it says. |
17 | local ($subr) = 'lang_' . $lang . '_rewrite'; |
18 | # Note: computed subr call. |
19 | - local ($r) = do $subr ($base, $extension); |
20 | + local ($r) = &$subr ($base, $extension); |
21 | # Skip this entry if we were asked not to process it. |
22 | next if ! $r; |
23 |