On 21/03/14 00:13, kevin dawson wrote:
Hi all,
Any Body else got any ideas
~/src/Padre/Padre$ perl -v
This is perl 5, version 19, subversion 9 (v5.19.9) built for
i686-linux-thread-multi
~/src/Padre/Padre$ prove -lv t/50_browser.t
t/50_browser.t ..
1..14
ok 1 - use Padre::Browser;
ok 2 - use Padre::Task::Browser;
ok 3 - use Padre::Browser::Document;
ok 4 - instance Padre::Browser
ok 5 - An object of class 'Padre::Browser::Document' isa
'Padre::Browser::Document'
ok 6 - Mimetype is sane
ok 7 - An object of class 'Padre::Browser::Document' isa
'Padre::Browser::Document'
not ok 8 - undef isa 'Padre::Browser::Document'
# Failed test 'undef isa 'Padre::Browser::Document''
# at t/50_browser.t line 46.
# undef isn't defined
Can't call method "mimetype" on an undefined value at t/50_browser.t
line 47.
ok 9 - no warnings
# Looks like you planned 14 tests but ran 9.
# Looks like you failed 1 test of 9 run.
# Looks like your test exited with 25 just after 9.
Dubious, test returned 25 (wstat 6400, 0x1900)
Failed 6/14 subtests
Test Summary Report
-------------------
t/50_browser.t (Wstat: 6400 Tests: 9 Failed: 1)
Failed test: 8
Non-zero exit status: 25
Parse errors: Bad plan. You planned 14 tests but ran 9.
Files=1, Tests=9, 1 wallclock secs ( 0.05 usr 0.00 sys + 0.24 cusr
0.01 csys = 0.30 CPU)
Result: FAIL
looks like the following is the issue
my $db = Padre::Browser->new();
ok( $db, 'instance Padre::Browser' );
my $doc = Padre::Browser::Document->load( catfile( 'lib', 'Padre',
'Browser.pm' ) );
isa_ok( $doc, 'Padre::Browser::Document' );
ok( $doc->mimetype eq 'application/x-perl', 'Mimetype is sane' );
my $docs = $db->docs($doc);
isa_ok( $docs, 'Padre::Browser::Document' );
my $tm = $db->resolve( URI->new('perldoc: Test::More') );
isa_ok( $tm, 'Padre::Browser::Document' );
Padre::Browser is returning undef
what is this format: 'perldoc: Test::More'
that's as far as I got on first pass
anybody else got 2 cents ( should be 2d)
regards
kevin <bowtie>
_______________________________________________
Padre-dev mailing list
Padre-dev@perlide.org
http://mail.perlide.org/mailman/listinfo/padre-dev
fixed
see: Checkin created revision 19825-6
- comment out Padre::Browser::PseudoPerldoc->process to enable
t/50-browser.t to pass on perl 5.19.9 (BOWTIE)
needs reviewing to check ok
regards
kevin <bowtie>
_______________________________________________
Padre-dev mailing list
Padre-dev@perlide.org
http://mail.perlide.org/mailman/listinfo/padre-dev
