You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by st...@apache.org on 2002/08/12 09:11:40 UTC

cvs commit: modperl Changes

stas        2002/08/12 00:11:39

  Modified:    lib/Apache PerlRun.pm
               .        Changes
  Log:
  eliminate warnings when flushing functions with empty () prototypes in
  Apache::PerlRun::flush_namespace
  Submitted by:	Yair Lenga <ya...@citigroup.com>
  Reviewed by:	stas
  
  Revision  Changes    Path
  1.40      +1 -1      modperl/lib/Apache/PerlRun.pm
  
  Index: PerlRun.pm
  ===================================================================
  RCS file: /home/cvs/modperl/lib/Apache/PerlRun.pm,v
  retrieving revision 1.39
  retrieving revision 1.40
  diff -u -r1.39 -r1.40
  --- PerlRun.pm	29 May 2002 16:52:17 -0000	1.39
  +++ PerlRun.pm	12 Aug 2002 07:11:39 -0000	1.40
  @@ -354,7 +354,7 @@
           if (defined &$fullname) {
               no warnings;
               local $^W = 0;
  -            if (my $p = prototype $fullname) {
  +            if (defined(my $p = prototype $fullname)) {
                   *{$fullname} = eval "sub ($p) {}";
               }
               else {
  
  
  
  1.655     +3 -0      modperl/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.654
  retrieving revision 1.655
  diff -u -r1.654 -r1.655
  --- Changes	31 Jul 2002 02:10:16 -0000	1.654
  +++ Changes	12 Aug 2002 07:11:39 -0000	1.655
  @@ -10,6 +10,9 @@
   
   =item 1.27_01-dev
   
  +eliminate warnings when flushing functions with empty () prototypes in
  +Apache::PerlRun::flush_namespace [Yair Lenga <ya...@citigroup.com>]
  +
   fix Apache::Status to not use :: in filenames, which is not allowed on
   certain OSs [DH <cr...@yahoo.com>]