>>> "Patrick" == Patrick Welche <[EMAIL PROTECTED]> writes:
[...]
Patrick> Bareword "am__installdirs" not allowed while "strict
Patrick> subs" in use at ./automake.tmp line 4742. BEGIN not
Patrick> safe after errors--compilation aborted at
Patrick> ./automake.tmp line 7682.
>> Which version of Perl is this?
Patrick> v5.6.0, and you guessed right: everything passes/works
Patrick> happily on a perl v5.8.0rc2 machine.
Thanks! Here is what I've found in the Perl 5.6.1 changelog:
____________________________________________________________________________
[ 7283] By: gsar on 2000/10/16 03:52:14
Log: integrate change#5977 from mainline
autoquote barewords followed by newline and arrow properly
(variant of fix suggested by Rick Delaney and M.J.T. Guy)
Branch: maint-5.6/perl
!> t/pragma/warn/toke toke.c
____________________________________________________________________________
So the bug is that Perl 5.6.0's "=>" operator doesn't quote the previous
word if separated by a new line.
I'm installing the following change.
2002-11-14 Alexandre Duret-Lutz <[EMAIL PROTECTED]>
* automake.in (handle_installdirs): Reindent to workaround a
parsing bug in Perl 5.6.0.
Reported by Patrick Welche.
Index: automake.in
===================================================================
RCS file: /cvs/automake/automake/automake.in,v
retrieving revision 1.1386
diff -u -r1.1386 automake.in
--- automake.in 14 Nov 2002 16:11:55 -0000 1.1386
+++ automake.in 14 Nov 2002 16:31:25 -0000
@@ -4736,14 +4736,12 @@
# Deal with installdirs target.
sub handle_installdirs ()
{
- $output_rules .=
- &file_contents ('install',
- new Automake::Location,
- am__installdirs
- => variable_value ('am__installdirs') || '',
- 'installdirs-local'
- => (target_defined ('installdirs-local')
- ? ' installdirs-local' : ''));
+ $output_rules .= &file_contents
+ ('install',
+ new Automake::Location,
+ am__installdirs => variable_value ('am__installdirs') || '',
+ 'installdirs-local' => (target_defined ('installdirs-local')
+ ? ' installdirs-local' : ''));
}
--
Alexandre Duret-Lutz
