Pugs Smoke test

mkirank has asked for the wisdom of the Perl Monks concerning the following question:

I have integrated Test::WWW::Selenium with the pugs smoke test suite to create a graphical output of the tests for our Application. Its bascically these scripts
run-smoke.pl
yaml-harness.pl
testgraph.pl
catalog_tests.pl
I am able to run the tests and the HTML output created but when i click on the Individual test it does not point to the correct test case. This seems to be happening even in the Pugs test output. looking into testgraph.pl the following code

    package My::Subtest;
    use base qw/Test::TAP::Model::Subtest::Visual/;
    sub link {
        my $self = shift;
        my $link = $self->SUPER::link;
        $link =~ s/\.t(?=#line|$)/.html/;
        File::Spec->catdir("t_index",$link);
    }
[download]

the $self->SUPER::link is returning a # . The cause seems to be something to do with Test::TAP::Model::Subtest but i am not sure . Any pointers on where the problem could be ?

Thanks to the Pugs team for the modules

Comment on Pugs Smoke test Download Code

Replies are listed 'Best First'.
Re: Pugs Smoke test by gaal (Parson) on Dec 21, 2006 at 18:22 UTC
`testgraph.pl` has been superseded by `util/smartlinks.pl`. Give that a try? Also, please /msg me your email address so I can send you a commit bit, so you can easily push in any improvements you make :-)	[reply] [d/l] [select]
Re^2: Pugs Smoke test by mkirank (Chaplain) on Dec 21, 2006 at 23:09 UTC
This info is rendered by the pugs Test.pm it ouputs a line `$out = "$out <pos:$?CALLER::CALLER::POSITION>" if $Test::ALWAYS_CALLE +R;` [download] I am assuming that to get the same in perl 5 I will need to subclass the Test::Builder and use the caller method to get filename and position .. smartlinks is linking the tests to synopsis so will not be useful for my purpose.. thanks for your reply.	[reply] [d/l]