This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
metaconfig.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
4aff63a
)
Use a different workaround to deceive metalint on something
author
H.Merijn Brand
<h.m.brand@xs4all.nl>
Mon, 3 Apr 2006 07:08:46 +0000
(07:08 +0000)
committer
H.Merijn Brand
<h.m.brand@xs4all.nl>
Mon, 3 Apr 2006 07:08:46 +0000
(07:08 +0000)
that doesn't really happen when eval is in charge
p4raw-id: //depot/metaconfig@27695
U/installdirs/Setprefixvar.U
patch
|
blob
|
blame
|
history
diff --git
a/U/installdirs/Setprefixvar.U
b/U/installdirs/Setprefixvar.U
index
9ae8b7c
..
8d67fcd
100644
(file)
--- a/
U/installdirs/Setprefixvar.U
+++ b/
U/installdirs/Setprefixvar.U
@@
-41,7
+41,10
@@
$startsh
EOS
cat <<'EOSC' >>setprefixvar
eval "${prefixvar}=\"\$ans\""
-eval "${prefixvar}exp\=\"\$ansexp\""
+?X: metalint will see the next line as one that assigns to $exp
+?X: declaring exp as a temp variable exp will catch that.
+?T:exp
+eval "${prefixvar}exp=\"\$ansexp\""
. ./installprefix
EOSC
chmod +x setprefixvar