File: auto_inherit.t

package info (click to toggle)
libtest-spec-perl 0.45-1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 252 kB
  • sloc: perl: 2,050; makefile: 2
file content (17 lines) | stat: -rwxr-xr-x 388 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
#!/usr/bin/env perl
#
# auto_inherit.t
#
########################################################################
#

package Testcase::Spec::AutoInherit;
use Test::Spec;

describe "Test::Spec" => sub {
  it "should insert itself into the inheritance chain of any package that imports it" => sub {
    ok( Testcase::Spec::AutoInherit->isa('Test::Spec') );
  };
};

runtests unless caller;