Mercurial > pub > Impl

annotate _test/Web.t @ 7:94d47b388442

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Улучшены тесты Исправлены ошибки Улучшена документация Работа над схемой DOM
author Sergey
date Mon, 24 Aug 2009 01:05:34 +0400
parents
children 16ada169ca75
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
1 #!/usr/bin/perl -w
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
2 use strict;
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
3 use lib '../Lib';
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
4 use lib '.';
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
5
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
6 use IMPL::Test::Plan;
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
7 use IMPL::Test::TAPListener;
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
8
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
9 my $plan = new IMPL::Test::Plan qw(
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
10 Test::Web::TDocument
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
11 );
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
12
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
13 $plan->AddListener(new IMPL::Test::TAPListener);
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
14 $plan->Prepare();
94d47b388442 Улучшены тесты
Sergey
parents:
diff changeset
15 $plan->Run();