This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix $trnl interpolation in here-docs (via PM)
authorAndy Dougherty <doughera@lafayette.edu>
Mon, 13 Jul 1998 15:49:00 +0000 (11:49 -0400)
committerGurusamy Sarathy <gsar@cpan.org>
Tue, 14 Jul 1998 03:55:29 +0000 (03:55 +0000)
Message-Id: <Pine.SUN.3.96.980713151243.28129F-100000@newton.phys>
Subject: Re: [PATCH] 5.004_73: Re: Configure/trnl craziness

p4raw-id: //depot/perl@1473

Configure

index 8a06f64..e3fef7e 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -1476,7 +1476,7 @@ while expr "X\$ans" : "X!" >/dev/null; do
                y)
                        echo "*** Substitution done -- please confirm."
                        xxxm="\$ans"
-                       ans=\`echo $n "\$ans$c" | tr $trnl ' '\`
+                       ans=\`echo $n "\$ans$c" | tr '$trnl' ' '\`
                        xxxm="\$ans"
                        ans=!
                        ;;