Hi,

I had probleme like yours some and I solved it with the classical way:

---
package Me;

use Test::Unit;
 
@ISA = qw(Test::Unit::TestCase);

sub new {
  my $self = Test::Unit::TestCase->new(@_);
  my $type = shift;
  bless $self, $type;
  $self->{config} = 0;
  $self->quell_backtrace();
  return $self;
}

sub test_creation {
  my $self = shift;
  $self->assert( 1 == 1);
}



1;

----

Another advice was to try out the newest sources via CVS.

Bye

Oliver

--
Oliver Fischer - mailto:[EMAIL PROTECTED]



_______________________________________________
Perlunit-devel mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/perlunit-devel

Reply via email to