Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

Pugs Smoke test

by mkirank (Chaplain)
on Dec 21, 2006 at 18:06 UTC ( #591151=perlquestion: print w/replies, xml ) Need Help??
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
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 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); }
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

Replies are listed 'Best First'.
Re: Pugs Smoke test
by gaal (Parson) on Dec 21, 2006 at 18:22 UTC has been superseded by util/ 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 :-)
      This info is rendered by the pugs it ouputs a line
      $out = "$out <pos:$?CALLER::CALLER::POSITION>" if $Test::ALWAYS_CALLE +R;
      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.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://591151]
Approved by Arunbear
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (3)
As of 2018-07-22 13:12 GMT
Find Nodes?
    Voting Booth?
    It has been suggested to rename Perl 6 in order to boost its marketing potential. Which name would you prefer?

    Results (454 votes). Check out past polls.