[Openinteract-commits] CVS: OpenInteract2/lib/OpenInteract2 Request.pm, 1.58, 1.59

[Teemu A. <in...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2
In directory sc8-pr-cvs3.sourceforge.net:/tmp/cvs-serv14928

Modified Files:
	Request.pm 
Log Message:
Implemented post_body(). This is necessary for all special requests
like XML-RPC and SOAP to retrieve the request content.

Also implemented server_port(). This is useful for example to construct
complete absolute URLs.


Index: Request.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Request.pm,v
retrieving revision 1.58
retrieving revision 1.59
diff -C2 -d -r1.58 -r1.59
*** Request.pm	6 Apr 2005 20:54:30 -0000	1.58
--- Request.pm	18 Aug 2006 00:25:27 -0000	1.59
***************
*** 24,29 ****
  
  my %FIELDS = map { $_ => 1 } qw(
!     now server_name remote_host
!     user_agent referer cookie_header language_header
      url_absolute url_relative url_initial forwarded_for
      session auth_user auth_group auth_is_admin auth_is_logged_in
--- 24,29 ----
  
  my %FIELDS = map { $_ => 1 } qw(
!     now server_name server_port remote_host
!     user_agent referer cookie_header language_header post_body
      url_absolute url_relative url_initial forwarded_for
      session auth_user auth_group auth_is_admin auth_is_logged_in
***************
*** 471,474 ****
--- 471,476 ----
  sub init { oi_error 'Subclass must implement init()' }
  
+ sub post_body { oi_error 'Subclass must implement post_body()' }
+ 
  1;
  
***************
*** 804,807 ****
--- 806,813 ----
  Hostname of our server.
  
+ B<server_port>
+ 
+ Port of our server.
+ 
  B<remote_host>
  
***************
*** 823,826 ****
--- 829,837 ----
  URL (string) where the user came from. (May be empty, forged, etc.)
  
+ B<post_body>
+ 
+ POST body content in the request. This can be used to retrieve for example
+ SOAP or XML-RPC requests.
+ 
  =head2 Action Messages