Mercurial > pub > Impl

annotate _test/Resources.t @ 25:9dd67fa91ee3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
small fix in the dom schema works under text schema
author Sergey
date Tue, 13 Oct 2009 17:51:25 +0400
parents 818c74b038ae
children 16ada169ca75
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
18
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
1 #!/usr/bin/perl -w
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
2 use strict;
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
3 use lib '../Lib';
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
4 use lib '.';
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
5
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
6 use IMPL::Test::Plan;
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
7 use IMPL::Test::TAPListener;
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
8
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
9 my $plan = new IMPL::Test::Plan qw(
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
10 Test::Resources::Format
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
11 );
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
12
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
13 $plan->AddListener(new IMPL::Test::TAPListener);
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
14 $plan->Prepare();
818c74b038ae DOM Schema + tests
Sergey
parents:
diff changeset
15 $plan->Run();