Changeset 3120

Show
Ignore:
Timestamp:
12/14/07 04:10:42 (5 years ago)
Author:
typester
Message:

Fuse::Hatena: マウントテスト。build requires追加

Location:
lang/perl/Fuse-Hatena/trunk
Files:
2 modified

Legend:

Unmodified
Added
Removed

  • lang/perl/Fuse-Hatena/trunk/Makefile.PL

    r3119 r3120  
    44 
    55build_requires( 
    6     'File::Temp'  => '0.19', 
    7     'Path::Class' => 0, 
    8     'Test::More'  => 0, 
     6    'File::Temp'                => '0.19', 
     7    'Path::Class'               => 0, 
     8    'Test::MockObject::Extends' => 0, 
     9    'Test::More'                => 0, 
    910); 
    1011 

  • lang/perl/Fuse-Hatena/trunk/t/01_mount.t

    r3118 r3120  
    11use Test::Base; 
     2use Test::MockObject::Extends; 
    23use t::Util; 
    34 
    … …  
    89 
    910my $dir  = File::Temp->newdir; 
    10 my $fuse = Fuse::Hatena->new($dir->dirname); 
     11my $fuse = Fuse::Hatena->new( mountpoint => $dir->dirname, username => 'test',); 
     12 
     13my $mock = Test::MockObject::Extends->new( $fuse->ua ); 
     14$mock->mock( login => sub { 1 } ); 
     15$mock->mock( get   => sub { 1 } ); 
    1116 
    1217isa_ok($fuse, 'Fuse::Hatena');