cvs commit: modperl-2.0/lib/ModPerl WrapXS.pm

[stas]

stas2003/11/19 11:30:11

  Modified:lib/Apache compat.pm
   .Changes
   lib/ModPerl WrapXS.pm
  Log:
  Apache->can_stack_handlers is now in Apache::compat (mp2 always can
  stack handlers)
  
  Revision  ChangesPath
  1.90  +3 -0  modperl-2.0/lib/Apache/compat.pm
  
  Index: compat.pm
  ===
  RCS file: /home/cvs/modperl-2.0/lib/Apache/compat.pm,v
  retrieving revision 1.89
  retrieving revision 1.90
  diff -u -u -r1.89 -r1.90
  --- compat.pm 21 Oct 2003 22:20:18 -  1.89
  +++ compat.pm 19 Nov 2003 19:30:11 -  1.90
  @@ -126,6 +126,9 @@
   die $err if $err;
   }
   
  +# mp2 always can stack handlers
  +sub can_stack_handlers { 1; }
  +
   sub push_handlers {
   shift;
   Apache->server->push_handlers(@_);
  
  
  
  1.256 +3 -0  modperl-2.0/Changes
  
  Index: Changes
  ===
  RCS file: /home/cvs/modperl-2.0/Changes,v
  retrieving revision 1.255
  retrieving revision 1.256
  diff -u -u -r1.255 -r1.256
  --- Changes   17 Nov 2003 23:27:46 -  1.255
  +++ Changes   19 Nov 2003 19:30:11 -  1.256
  @@ -12,6 +12,9 @@
   
   =item 1.99_12-dev
   
  +Apache->can_stack_handlers is now in Apache::compat (mp2 always can
  +stack handlers) [Stas]
  +
   add access to $r->finfo() and related APR::Finfo methods,
   such as $r->finfo->size(), $r->finfo->mtime(), and
   APR::Finfo::stat() [Geoffrey Young]
  
  
  
  1.62  +2 -0  modperl-2.0/lib/ModPerl/WrapXS.pm
  
  Index: WrapXS.pm
  ===
  RCS file: /home/cvs/modperl-2.0/lib/ModPerl/WrapXS.pm,v
  retrieving revision 1.61
  retrieving revision 1.62
  diff -u -u -r1.61 -r1.62
  --- WrapXS.pm 30 Aug 2003 02:33:26 -  1.61
  +++ WrapXS.pm 19 Nov 2003 19:30:11 -  1.62
  @@ -687,6 +687,8 @@
 ''],
   SERVER_VERSION=> ['get_server_version',
 ''],
  +can_stack_handlers=> [undef,
  +  'there is no more need for that method'],
   
   # Apache::RequestRec
   soft_timeout  => [undef,
  
  
  

cvs commit: modperl-2.0/t/response/TestAPR finfo.pm

[randyk]

randyk  2003/11/19 15:01:37

  Modified:t/response/TestAPR finfo.pm
  Log:
  skip finfo->fname test on Win32 until it's available within apr
  (patch applied in current cvs).
  
  Revision  ChangesPath
  1.3   +9 -3  modperl-2.0/t/response/TestAPR/finfo.pm
  
  Index: finfo.pm
  ===
  RCS file: /home/cvs/modperl-2.0/t/response/TestAPR/finfo.pm,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -r1.2 -r1.3
  --- finfo.pm  18 Nov 2003 17:07:46 -  1.2
  +++ finfo.pm  19 Nov 2003 23:01:37 -  1.3
  @@ -98,9 +98,15 @@
   
   # tests for stuff not in perl's stat
   {
  -ok t_cmp($file,
  - $r->finfo->fname,
  - '$r->finfo->fname()');
  +# XXX r->finfo->fname requires on Win32 a patched cvs apr
  +if (WIN32) {
  +skip "finfo.fname not available yet on Win32";
  +}
  +else {
  +ok t_cmp($file,
  + $r->finfo->fname,
  + '$r->finfo->fname()');
  +}
   
   ok t_cmp(APR::REG,
$r->finfo->filetype,