> Thanks, Dominique. But care to post a unified patch? 'diff -u' > Thanks!
Actually it was one, but Thunderbird munged it :-(. Retrying with
mutt... Sorry for yet another blunder.
Index: ModPerl-Registry/lib/ModPerl/RegistryCooker.pm
===================================================================
--- ModPerl-Registry/lib/ModPerl/RegistryCooker.pm (revision 157426)
+++ ModPerl-Registry/lib/ModPerl/RegistryCooker.pm (working copy)
@@ -556,7 +556,9 @@
# func: rewrite_shebang
# dflt: rewrite_shebang
# desc: parse the shebang line and convert command line switches
-# (defined in %switches) into a perl code.
+# (defined in %switches) into a perl code. This routine must
+# not shange the number of lines in the script, lest the #line
+# statement be off-by-one in convert_script_to_compiled_handler().
# args: $self - registry blessed object
# rtrn: nothing
# efct: the CODE field gets adjusted
@@ -569,7 +571,7 @@
unless ${^TAINT};
"";
},
- 'w' => sub { "use warnings;\n" },
+ 'w' => sub { "use warnings; " },
);
sub rewrite_shebang {
--
Dominique QUATRAVAUX Ingénieur senior
01 44 42 00 08 IDEALX
pgpDa3qOHaTSi.pgp
Description: PGP signature
