X-Git-Url: https://git.distorted.org.uk/~mdw/distorted-bits/blobdiff_plain/34e5071063d4d70a293fec81bbcb480cad9f13f3..b8726cff3ffbac8304ea84cb0420cf2b35df3a1a:/mkaptsrc diff --git a/mkaptsrc b/mkaptsrc index 4d32d95..102d598 100755 --- a/mkaptsrc +++ b/mkaptsrc @@ -112,9 +112,8 @@ sub cset_lookup (\@$$;$) { last CSET if defined $val; } if (defined $val) { - $PAINT{$tag} = 1; + local $PAINT{$tag} = 1; my $exp = cset_expand @$cset, $ix, $val; - $PAINT{$tag} = 0; return $exp; } elsif ($mustp) { fail "variable `$tag\[$ix]' undefined"; } else { return undef; }