From: Graham Knop Date: Fri, 13 Jun 2014 22:19:01 +0000 (-0400) Subject: hide some internal packages from PAUSE X-Git-Tag: v1.003001~4 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FEval-WithLexicals.git;a=commitdiff_plain;h=e8f160819f87f43990046b2e95f521b93ed6feb1;hp=794daabd490b2438a46e9362a4339c6969b9bf40 hide some internal packages from PAUSE --- diff --git a/lib/Eval/WithLexicals.pm b/lib/Eval/WithLexicals.pm index 79d88f0..1dd6edb 100644 --- a/lib/Eval/WithLexicals.pm +++ b/lib/Eval/WithLexicals.pm @@ -69,7 +69,8 @@ ${to_eval} ${capture_code} sub Eval::WithLexicals::Cage::grab_captures { no warnings 'closure'; no strict 'vars'; - package Eval::WithLexicals::VarScope;!; + package! # hide from PAUSE + .q! Eval::WithLexicals::VarScope;!; # rest is appended by Eval::WithLexicals::Util::capture_list, called # during parsing by the BEGIN block from capture_code. @@ -123,7 +124,8 @@ sub _eval_do { } { - package Eval::WithLexicals::Util; + package # hide from PAUSE + Eval::WithLexicals::Util; use B qw(svref_2object);