/[cvs]/nfo/perl/libs/Log/Dispatch/Configurator/Hardwired.pm
ViewVC logotype

Diff of /nfo/perl/libs/Log/Dispatch/Configurator/Hardwired.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by joko, Tue Feb 18 18:47:36 2003 UTC revision 1.2 by joko, Tue May 13 09:35:13 2003 UTC
# Line 2  Line 2 
2  ##    $Id$  ##    $Id$
3  ##    --------------------------------------------------------------------------------  ##    --------------------------------------------------------------------------------
4  ##    $Log$  ##    $Log$
5    ##    Revision 1.2  2003/05/13 09:35:13  joko
6    ##    fixed log message
7    ##
8  ##    Revision 1.1  2003/02/18 18:47:36  joko  ##    Revision 1.1  2003/02/18 18:47:36  joko
9  ##    + initial commit  ##    + initial commit
10  ##  ##
# Line 24  use warnings; Line 27  use warnings;
27    
28  sub get_attrs_global {  sub get_attrs_global {
29      my $self = shift;      my $self = shift;
30        
31      my @dispatchers;      my @dispatchers;
32        my @verbose;
33            
34      # push all loggers to @dispatchers      # push all loggers to @dispatchers
35      push @dispatchers, 'screen';      push @dispatchers, 'screen';
36        push @verbose, 'screen:STDOUT';
37        
38      #print "logfile: ", $self->{logfile}, "\n";      #print "logfile: ", $self->{logfile}, "\n";
39      push @dispatchers, 'file' if ($self->{file_filename});      push @dispatchers, 'file' if ($self->{file_filename});
40        push @verbose, "file:" . $self->{file_filename} if $self->{file_filename};
41            
42      print "logging to [", join(" ", @dispatchers), "]", "\n" if ($self->{verbose});      print STDERR "logging to [", join(" ", @verbose), "]", "\n" if ($self->{verbose});
43      return {      return {
44          format => undef,          format => undef,
45          dispatchers => \@dispatchers,          dispatchers => \@dispatchers,

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

MailToCvsAdmin">MailToCvsAdmin
ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed