git.maemo.org Git - dh-make-perl/blob - dev/arm/libtest-simple-perl/libtest-simple-perl-0.80/lib/Test/Builder/Tester/Color.pm

   1 package Test::Builder::Tester::Color;
   2
   3 use strict;
   4
   5 require Test::Builder::Tester;
   6
   7 =head1 NAME
   8
   9 Test::Builder::Tester::Color - turn on colour in Test::Builder::Tester
  10
  11 =head1 SYNOPSIS
  12
  13    When running a test script
  14
  15      perl -MTest::Builder::Tester::Color test.t
  16
  17 =head1 DESCRIPTION
  18
  19 Importing this module causes the subroutine color in Test::Builder::Tester
  20 to be called with a true value causing colour highlighting to be turned
  21 on in debug output.
  22
  23 The sole purpose of this module is to enable colour highlighting
  24 from the command line.
  25
  26 =cut
  27
  28 sub import
  29 {
  30     Test::Builder::Tester::color(1);
  31 }
  32
  33 =head1 AUTHOR
  34
  35 Copyright Mark Fowler E<lt>mark@twoshortplanks.comE<gt> 2002.
  36
  37 This program is free software; you can redistribute it
  38 and/or modify it under the same terms as Perl itself.
  39
  40 =head1 BUGS
  41
  42 This module will have no effect unless Term::ANSIColor is installed.
  43
  44 =head1 SEE ALSO
  45
  46 L<Test::Builder::Tester>, L<Term::ANSIColor>
  47
  48 =cut
  49
  50 1;