root/abbreviation/trunk/t/test.t

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

added CAPS test

  • 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 => 7 }
4
5 use lib qw(testlib);
6 use abbreviation qw(Foo FooBar::Baz FooBar::Baz::Doh CAPS::On)
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 ok(CAPS::On->new);
14 ok(C::On->new);
15
16
17
Note: See TracBrowser for help on using the browser.