root/abbreviation/trunk/t/test.t

Revision 125 (checked in by miyagawa, 19 years ago)

Initial revision

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
Line 
1 use strict;
2 use Test;
3 BEGIN { plan tests => 5 }
4
5 use lib qw(testlib);
6 use abbreviation qw(Foo FooBar::Baz FooBar::Baz::Doh);
7
8 ok(Foo->new);
9 ok(FooBar::Baz->new);
10 ok(FB::Baz->new);
11 ok(FooBar::Baz::Doh->new);
12 ok(FB::B::Doh->new);
13
14
Note: See TracBrowser for help on using the browser.