cvs commit: modperl-2.0/lib/Apache compat.pm

[dougm]

dougm       01/11/19 15:33:21

  Modified:    lib/Apache compat.pm
  Log:
  add support for 1.x style $r->server_root_relative
  
  Revision  Changes    Path
  1.24      +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.23
  retrieving revision 1.24
  diff -u -r1.23 -r1.24
  --- compat.pm 2001/11/08 03:19:47     1.23
  +++ compat.pm 2001/11/19 23:33:21     1.24
  @@ -78,6 +78,9 @@
   
   package Apache::RequestRec;
   
  +#to support $r->server_root_relative
  +*server_root_relative = \&Apache::server_root_relative;
  +
   #we support Apache->request; this is needed to support $r->request
   #XXX: seems sorta backwards
   *request = \&Apache::request;