perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: modperl-2.0 Changes
Date Wed, 14 Jul 2004 07:27:00 GMT
stas        2004/07/14 00:27:00

  Modified:    t/response/TestAPI rutil.pm server_util.pm
               xs/Apache/ServerUtil Apache__ServerUtil.h
               xs/maps  apache_functions.map
               .        Changes
  Log:
  Apache::RequestUtil::method_register($s->process->pconf, 'FOO'); is
  now $s->method_register('FOO')
  
  Revision  Changes    Path
  1.17      +1 -4      modperl-2.0/t/response/TestAPI/rutil.pm
  
  Index: rutil.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/response/TestAPI/rutil.pm,v
  retrieving revision 1.16
  retrieving revision 1.17
  diff -u -u -r1.16 -r1.17
  --- rutil.pm	8 Jul 2004 05:29:42 -0000	1.16
  +++ rutil.pm	14 Jul 2004 07:27:00 -0000	1.17
  @@ -19,7 +19,7 @@
   sub handler {
       my $r = shift;
   
  -    plan $r, tests => (scalar keys %status_lines) + 8;
  +    plan $r, tests => (scalar keys %status_lines) + 7;
   
       ok $r->default_type;
   
  @@ -45,9 +45,6 @@
                    $line,
                    "Apache::RequestUtil::get_status_line($code)");
       }
  -
  -    t_debug('registering method FOO');
  -    ok Apache::RequestUtil::method_register($r->server->process->pconf, 'FOO');
   
       Apache::OK;
   }
  
  
  
  1.22      +5 -1      modperl-2.0/t/response/TestAPI/server_util.pm
  
  Index: server_util.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/response/TestAPI/server_util.pm,v
  retrieving revision 1.21
  retrieving revision 1.22
  diff -u -u -r1.21 -r1.22
  --- server_util.pm	9 Jul 2004 07:37:58 -0000	1.21
  +++ server_util.pm	14 Jul 2004 07:27:00 -0000	1.22
  @@ -8,6 +8,7 @@
   use File::Spec::Functions qw(canonpath catfile);
   
   use Apache::RequestRec ();
  +use Apache::ServerRec ();
   use Apache::ServerUtil ();
   use Apache::Process ();
   
  @@ -45,7 +46,7 @@
           '__PACKAGE__->new($r)' => __PACKAGE__->new($r),
       );
   
  -    plan $r, tests => 11     +
  +    plan $r, tests => 12     +
           (scalar keys %pools) +
           (scalar keys %objects);
   
  @@ -125,6 +126,9 @@
       t_debug('Apache::exists_config_define');
       ok Apache::exists_config_define('MODPERL2');
       ok ! Apache::exists_config_define('FOO');
  +
  +    t_debug('registering method FOO');
  +    ok $r->server->method_register('FOO');
   
       Apache::OK;
   }
  
  
  
  1.20      +3 -0      modperl-2.0/xs/Apache/ServerUtil/Apache__ServerUtil.h
  
  Index: Apache__ServerUtil.h
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/xs/Apache/ServerUtil/Apache__ServerUtil.h,v
  retrieving revision 1.19
  retrieving revision 1.20
  diff -u -u -r1.19 -r1.20
  --- Apache__ServerUtil.h	9 Jul 2004 08:01:22 -0000	1.19
  +++ Apache__ServerUtil.h	14 Jul 2004 07:27:00 -0000	1.20
  @@ -13,6 +13,9 @@
    * limitations under the License.
    */
   
  +#define mpxs_Apache__ServerRec_method_register(s, methname)    \
  +    ap_method_register(s->process->pconf, methname);
  +
   static MP_INLINE
   int mpxs_Apache__ServerRec_push_handlers(pTHX_ server_rec *s,
                                         const char *name,
  
  
  
  1.86      +6 -2      modperl-2.0/xs/maps/apache_functions.map
  
  Index: apache_functions.map
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/xs/maps/apache_functions.map,v
  retrieving revision 1.85
  retrieving revision 1.86
  diff -u -u -r1.85 -r1.86
  --- apache_functions.map	5 Jul 2004 04:00:12 -0000	1.85
  +++ apache_functions.map	14 Jul 2004 07:27:00 -0000	1.86
  @@ -37,7 +37,7 @@
   
   MODULE=Apache::RequestUtil
    ap_get_status_line
  - ap_method_register
  +
   
   MODULE=Apache::RequestUtil   PACKAGE=guess
   >ap_finalize_request_protocol
  @@ -156,7 +156,11 @@
   -ap_scan_script_header_err_strs
   -ap_scan_script_header_err_brigade
   
  -MODULE=Apache::ServerUtil   PACKAGE=guess   BOOT=1
  +MODULE=Apache::ServerUtil   PACKAGE=Apache::ServerRec BOOT=1
  +~ap_method_register
  + int:DEFINE_method_register | | server_rec *:s, const char *:methname
  +
  +MODULE=Apache::ServerUtil   PACKAGE=guess
    ap_add_version_component
    ap_error_log2stderr
   ?ap_replace_stderr_log
  
  
  
  1.411     +4 -1      modperl-2.0/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/Changes,v
  retrieving revision 1.410
  retrieving revision 1.411
  diff -u -u -r1.410 -r1.411
  --- Changes	13 Jul 2004 03:59:46 -0000	1.410
  +++ Changes	14 Jul 2004 07:27:00 -0000	1.411
  @@ -1,4 +1,4 @@
  -=head1 NAME
  + =head1 NAME
   
   Changes - Apache mod_perl changes logfile
   
  @@ -11,6 +11,9 @@
   =over 3
   
   =item 1.99_15-dev
  +
  +Apache::RequestUtil::method_register($s->process->pconf, 'FOO'); is
  +now $s->method_register('FOO') [Stas]
   
   Remove $Apache::Server::StrictPerlSections. Now, all <Perl>
   sections errors are fatal by default and cause server startup to
  
  
  

Mime
View raw message