You are viewing a plain text version of this content. The canonical link for it is here.
Posted to axkit-dev@xml.apache.org by ma...@sergeant.org on 2006/08/02 22:53:35 UTC

[SVN] [32] Provided a passthrough param() method on the $client

Revision: 32
Author:   matt
Date:     2006-08-02 20:53:16 +0000 (Wed, 02 Aug 2006)

Log Message:
-----------
Provided a passthrough param() method on the $client
Updated TODO

Modified Paths:
--------------
    trunk/TODO.txt
    trunk/demo/xsp/test.xsp
    trunk/lib/AxKit2/Connection.pm

Modified: trunk/TODO.txt
===================================================================
--- trunk/TODO.txt	2006-08-02 20:41:47 UTC (rev 31)
+++ trunk/TODO.txt	2006-08-02 20:53:16 UTC (rev 32)
@@ -1,3 +1,4 @@
+
 AxKit2 TODO List
 ================
 
@@ -2,2 +3,5 @@
 - Implement Apache::Request-a-like and figure out how to past to Transformers
+    - Sort of done. POST/PUT body data goes through the body_data hook. I have
+      not yet written a plugin to parse these but it should be straightforward.
+      Querystring data is parsed and available via the param() method.
 

Modified: trunk/demo/xsp/test.xsp
===================================================================
--- trunk/demo/xsp/test.xsp	2006-08-02 20:41:47 UTC (rev 31)
+++ trunk/demo/xsp/test.xsp	2006-08-02 20:53:16 UTC (rev 32)
@@ -11,8 +11,8 @@
         <querystring>
             <xsp:expr>
                 [
-                    map { {key => $_, value => [ $cgi->headers_in->param($_) ] } }
-                        $cgi->headers_in->param
+                    map { {key => $_, value => [ $cgi->param($_) ] } }
+                        $cgi->param
                 ]
             </xsp:expr>
         </querystring>

Modified: trunk/lib/AxKit2/Connection.pm
===================================================================
--- trunk/lib/AxKit2/Connection.pm	2006-08-02 20:41:47 UTC (rev 31)
+++ trunk/lib/AxKit2/Connection.pm	2006-08-02 20:53:16 UTC (rev 32)
@@ -142,6 +142,11 @@
     $self->{headers_in};
 }
 
+sub param {
+    my AxKit2::Connection $self = shift;
+    $self->{headers_in}->param(@_);
+}
+
 sub send_http_headers {
     my AxKit2::Connection $self = shift;