Geoffrey Young wrote:

Geoffrey Young wrote:


  +package Apache::Connection;
  +
  +# auth_type and user records don't exist in 2.0 conn_rec struct
  +# 'PerlOptions +GlobalRequest' is required
  +sub auth_type { Apache->request->auth_type }
  +sub user      { Apache->request->user      }
  +
   1;

on a separate note, the above subs need to be both get/set.

--Geoff

Index: lib/Apache/compat.pm
===================================================================
RCS file: /home/cvspublic/modperl-2.0/lib/Apache/compat.pm,v
retrieving revision 1.77
diff -u -r1.77 compat.pm
--- lib/Apache/compat.pm        12 Feb 2003 23:42:23 -0000      1.77
+++ lib/Apache/compat.pm        14 Feb 2003 15:50:24 -0000
@@ -534,8 +534,8 @@

 # auth_type and user records don't exist in 2.0 conn_rec struct
 # 'PerlOptions +GlobalRequest' is required
-sub auth_type { Apache->request->auth_type }
-sub user      { Apache->request->user      }
+sub auth_type { shift; Apache->request->auth_type(@_) }
+sub user      { shift; Apache->request->user(@_)      }

 1;
 __END__


---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to