Changeset 14207 for lang/perl/App-Nakanobu
- Timestamp:
- 06/18/08 16:48:53 (5 months ago)
- Location:
- lang/perl/App-Nakanobu/trunk
- Files:
-
- 2 modified
-
lib/App/Nakanobu/Plugin/Component/JSONRPC/HTTP.pm (modified) (1 diff)
-
tools/jsonrpc-client.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
lang/perl/App-Nakanobu/trunk/lib/App/Nakanobu/Plugin/Component/JSONRPC/HTTP.pm
r14204 r14207 21 21 ); 22 22 23 my $marshal = JSON::RPC::Common::Marshal::HTTP->new( 24 json => JSON->new->utf8(1), 25 ); 23 my $marshal = JSON::RPC::Common::Marshal::HTTP->new(); 24 $marshal->json->utf8(1); 26 25 27 26 my $method_map = { -
lang/perl/App-Nakanobu/trunk/tools/jsonrpc-client.pl
r14203 r14207 1 1 use strict; 2 2 use warnings; 3 use utf8; 3 4 use JSON::RPC::Client; 4 5 5 6 my $uri = 'http://localhost:5555/'; 6 7 my $method = 'privmsg'; 7 my $params = {channel => '#nakanobu', text => ' lovely'};8 my $params = {channel => '#nakanobu', text => 'あいうえお123' }; 8 9 9 10 my $client = JSON::RPC::Client->new;
![(please configure the [header_logo] section in trac.ini)](/share/chrome/site/your_project_logo.png)