root/Log-Dispatch-Config/trunk/t/01_configure.t

Revision 344 (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::More 'no_plan';
3
4 use Log::Dispatch::Config;
5 Log::Dispatch::Config->configure('t/log.cfg');
6
7 my $disp = Log::Dispatch->instance;
8
9 isa_ok $disp->{outputs}->{file}, 'Log::Dispatch::File';
10 isa_ok $disp->{outputs}->{screen}, 'Log::Dispatch::Screen';
11
12 my $another = Log::Dispatch->instance;
13 is "$disp", "$another", "same instance - $disp";
Note: See TracBrowser for help on using the browser.