Re: [patch] optional exports from Apache::TestUtil

Geoffrey Young wrote:
> hi all...
>
> I don't see why Apache::TestUtil exports so many functions by default, 
> yet it leaves out three that are just as helpful.

Because there are private functions (think of these as _foo). Do you need them?

> attached is a patch that makes the public, non t_* functions exportable 
> on demand.
>
> --Geoff
>
>
> ------------------------------------------------------------------------
>
> Index: Apache-Test/lib/Apache/TestUtil.pm
> ===================================================================
> RCS file: 
> /home/cvspublic/httpd-test/perl-framework/Apache-Test/lib/Apache/TestUtil.pm,v
> retrieving revision 1.29
> diff -u -r1.29 TestUtil.pm
> --- Apache-Test/lib/Apache/TestUtil.pm  1 Apr 2003 04:12:55 -0000       1.29
> +++ Apache-Test/lib/Apache/TestUtil.pm  11 Apr 2003 12:51:25 -0000
> @@ -15,7 +15,7 @@
>  use Apache::Test ();
>  use Apache::TestConfig ();
>  
> -use vars qw($VERSION @ISA @EXPORT %CLEAN);
> +use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %CLEAN);
>  
>  $VERSION = '0.01';
>  @ISA     = qw(Exporter);
> @@ -25,6 +25,8 @@
>      t_server_log_error_is_expected t_server_log_warn_is_expected
>      t_client_log_error_is_expected t_client_log_warn_is_expected
>  );
> +
> +@EXPORT_OK = qw(write_perl_script write_shell_script chown);
>  
>  %CLEAN = ();
>  
>
>
>
> ------------------------------------------------------------------------
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: dev-unsubscribe@xxxxxxxxxxxxxxx
> For additional commands, e-mail: dev-help@xxxxxxxxxxxxxxx


--


__________________________________________________________________
Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/     mod_perl Guide ---> http://perl.apache.org
mailto:stas@xxxxxxxxxx http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org   http://ticketmaster.com