| 2 |
## $Id$ |
## $Id$ |
| 3 |
## -------------------------------------------------------------------------------- |
## -------------------------------------------------------------------------------- |
| 4 |
## $Log$ |
## $Log$ |
| 5 |
|
## Revision 1.4 2003/12/05 18:08:20 joko |
| 6 |
|
## + improved: PID and timestamp |
| 7 |
|
## |
| 8 |
## Revision 1.3 2003/12/05 05:08:01 joko |
## Revision 1.3 2003/12/05 05:08:01 joko |
| 9 |
## + enhanced: more flexible - completely dis-/enable logging - don't do any logging when running tests |
## + enhanced: more flexible - completely dis-/enable logging - don't do any logging when running tests |
| 10 |
## |
## |
| 66 |
filename => $self->{file_filename}, |
filename => $self->{file_filename}, |
| 67 |
mode => 'append', |
mode => 'append', |
| 68 |
#format => '[%d] [%p] %m at %F line %L%n', |
#format => '[%d] [%p] %m at %F line %L%n', |
| 69 |
format => '[%d] [%p] %m%n', |
# new as of 2003-12-05: |
| 70 |
|
# [%i] shows process-id (pid) |
| 71 |
|
# dateformat like http://www.w3.org/TR/NOTE-datetime |
| 72 |
|
format => '[%d{%Y-%m-%dT%H:%M:%S}] [%i] [%p] %m%n', |
| 73 |
}; |
}; |
| 74 |
} |
} |
| 75 |
elsif ($name eq 'screen') { |
elsif ($name eq 'screen') { |
| 80 |
#min_level => 'error', |
#min_level => 'error', |
| 81 |
min_level => $self->{screen_min_level}, |
min_level => $self->{screen_min_level}, |
| 82 |
stderr => 1, |
stderr => 1, |
| 83 |
format => '%p: %m%n', |
format => '[%i] %p: %m%n', |
| 84 |
}; |
}; |
| 85 |
} |
} |
| 86 |
else { |
else { |