git.maemo.org Git - pkg-perl/blob - deb-src/libspiffy-perl/libspiffy-perl-0.30/t/export7.t

   1 use Test::More;
   2
   3 plan tests => 4;
   4
   5 package B;
   6 use Spiffy -Base, -XXX;
   7
   8 package A;
   9 use Spiffy -Base;
  10
  11 package main;
  12
  13 ok(not defined &A::XXX);
  14 ok(defined &A::field);
  15
  16 ok(defined &B::XXX);
  17 ok(defined &B::field);