diff options
author | Daniel Friesel <derf@finalrewind.org> | 2011-07-04 12:40:55 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2011-07-04 12:40:55 +0200 |
commit | dc9f255ebfe2aa022264f4c2a53f80a98f392122 (patch) | |
tree | e7330871cb774b7b335aff244853ff9f5e2db4ee /t/29-app-raps2.t | |
parent | be72cdb6136ff611f35e8ee2d83cfc2a7c0b2f22 (diff) |
Prepare for more advanced App::Raps2 tests
Diffstat (limited to 't/29-app-raps2.t')
-rw-r--r-- | t/29-app-raps2.t | 30 |
1 files changed, 0 insertions, 30 deletions
diff --git a/t/29-app-raps2.t b/t/29-app-raps2.t deleted file mode 100644 index 53aa51d..0000000 --- a/t/29-app-raps2.t +++ /dev/null @@ -1,30 +0,0 @@ -#!/usr/bin/env perl -use strict; -use warnings; -use 5.010; - -use Test::More; - -eval "use Test::MockObject"; -plan skip_all => 'Test::MockObject required' if $@; - -plan tests => 4; - -my $mock = Test::MockObject->new(); -$mock->fake_module( - 'Term::ReadLine', - new => sub { return bless({}, $_[0]) }, -); - -use_ok('App::Raps2'); - -my $r2 = App::Raps2->new( dont_touch_fs => 1 ); -isa_ok($r2, 'App::Raps2'); - -isa_ok($r2->ui(), 'App::Raps2::UI'); - -is_deeply( - $r2->file_to_hash('t/in/hash'), - { key => 'value', otherkey => 'othervalue' }, - 'file_to_hash works', -); |