view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

* Important notice: RPC::XML 0.69 introduced a backwards incompatible
  change. For now, this module will only work with RPC::XML 0.67 or
  before. See this bug report for RPC::XML for details:
    https://rt.cpan.org/Ticket/Display.html?id=50013
* Address: #44995: Instruction to disable RenderView action. 
  Updated tutorial accordingly.
* Address: #46316: Catalyst::Plugin::Server is trying to use NEXT, which 
  is deprecated. We are now using MRO::compat instead.
* Address: #45709 Documentation Ambiguity leads to confusion; The use of 
  $c->req->xmlrpc->error is now documented in more detail.
* Add unicode tests
* Other small test improvements

0.24  Tue Jan  2 16:26:59 CET 2007
==================================
* Removed circular reference which caused memory leak
  in XMLRPC::Request object
* Added config option for changing the default RPC::XML::Encoding

0.22  Fri Dec  1 14:59:13 CET 2006
==================================

t/002_live.t  view on Meta::CPAN

my %RpcArgs     = ( 1 => "b" );
#my %RpcRv       = ( auto => 1, begin => 1, end => 1, input => \%RpcArgs );
my %RpcRv       = ( auto => 1, begin => 1, end => 1 );
my $EntryPoint  = 'http://localhost/rpc';
my $Prefix      = 'rpc.functions.';

my %Methods     = (
    # method name       # rv
    'echo.regex'        => 'echo_regex',
    'echo_unicode'      => do { utf8::decode( my $x = '私はクリスです' ); $x },
    'echo_plain'        => 'echo_plain', 
    'echo.path'         => 'echo_path',

    'echo.path.stash'   => { %RpcRv, function => 'echo_path_stash' },
    'echo.regex.stash'  => { %RpcRv, function => 'echo_regex_stash' },
    'echo_plain_stash'  => { %RpcRv, function => 'echo_plain_stash' },
);


# init -- mention var twice due to warnings;

t/lib/TestApp/Controller/RPC/Functions.pm  view on Meta::CPAN

sub echo_plain : XMLRPCLocal {
    my ($self, $c, %args) = @_;
    $c->stash->{'xmlrpc'} = 'echo_plain';
}

sub echo_plain_stash : XMLRPCLocal {
    my ($self, $c, %args) = @_;
    $c->stash->{'function'} = 'echo_plain_stash';
}

sub echo_unicode: XMLRPCLocal {
    my ($self, $c, %args) = @_;
    $c->stash->{'xmlrpc'} = '私はクリスです'
}

sub echo_path : XMLRPCPath('/rpc/functions/echo/path') {
    my ($self, $c, %args) = @_;
    $c->stash->{'xmlrpc'} = 'echo_path';
}

sub echo_path_stash : XMLRPCPath('/rpc/functions/echo/path/stash') {