Changeset 371
- Timestamp:
- 03/29/07 16:17:44 (2 years ago)
- Files:
-
- library/perl/trunk/Catalyst-Plugin-Authentication-Credential-JugemKey/Changes (modified) (1 diff)
- library/perl/trunk/Catalyst-Plugin-Authentication-Credential-JugemKey/META.yml (modified) (1 diff)
- library/perl/trunk/Catalyst-Plugin-Authentication-Credential-JugemKey/lib/Catalyst/Plugin/Authentication/Credential/JugemKey.pm (modified) (2 diffs)
- library/perl/trunk/Catalyst-Plugin-Authentication-Credential-JugemKey/t/01-methods.t (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
library/perl/trunk/Catalyst-Plugin-Authentication-Credential-JugemKey/Changes
r138 r371 1 1 Revision history for Catalyst-Plugin-Authentication-Credential-JugemKey 2 3 0.03 Thu Mar 29 16:15:44 JST 2007 4 - A patch for t/01-methods.t from typester-san.Thanks! 2 5 3 6 0.02 Fri June 03 11:38:00 2006 library/perl/trunk/Catalyst-Plugin-Authentication-Credential-JugemKey/META.yml
r139 r371 2 2 #XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX# 3 3 name: Catalyst-Plugin-Authentication-Credential-JugemKey 4 version: 0.0 24 version: 0.03 5 5 version_from: lib/Catalyst/Plugin/Authentication/Credential/JugemKey.pm 6 6 installdirs: site library/perl/trunk/Catalyst-Plugin-Authentication-Credential-JugemKey/lib/Catalyst/Plugin/Authentication/Credential/JugemKey.pm
r138 r371 4 4 use strict; 5 5 6 our $VERSION = '0.0 2';6 our $VERSION = '0.03'; 7 7 8 8 use WebService::JugemKey::Auth; … … 76 76 =head1 VERSION 77 77 78 Version 0.0 278 Version 0.03 79 79 80 80 =cut library/perl/trunk/Catalyst-Plugin-Authentication-Credential-JugemKey/t/01-methods.t
r136 r371 44 44 my $res = Test::MockObject->new; 45 45 46 $res->fake_module('WebService::JugemKey::Auth::User'); 47 $res->mock( name => sub { 'miyashita' } ); 48 $res->mock( token => sub { 'dummy_token' } ); 46 $res->fake_module( 47 'WebService::JugemKey::Auth::User', 48 name => sub {'miyashita'}, 49 token => sub {'dummy_token'} 50 ); 49 51 $jugemkey->mock( get_token => sub { $res } ); 50 52 … … 56 58 $c->mock( default_auth_store => sub { } ); 57 59 $c->mock( set_authenticated => sub { } ); 60 $c->mock( debug => sub { 0 } ); 58 61 59 62 ok( !$c->authenticate_jugemkey_get_token, 'auth failed without frob' );
