2 |
## $Id$ |
## $Id$ |
3 |
## ------------------------------------------------------------------------ |
## ------------------------------------------------------------------------ |
4 |
## $Log$ |
## $Log$ |
5 |
|
## Revision 1.5 2003/05/13 08:40:15 joko |
6 |
|
## minor update: renamed attribute |
7 |
|
## |
8 |
## Revision 1.4 2003/03/29 07:16:00 joko |
## Revision 1.4 2003/03/29 07:16:00 joko |
9 |
## minor update: changed default log-file-name to 'perl_app.log' |
## minor update: changed default log-file-name to 'perl_app.log' |
10 |
## |
## |
353 |
$configurator->{screen_min_level} = 'debug'; |
$configurator->{screen_min_level} = 'debug'; |
354 |
} |
} |
355 |
|
|
356 |
if ($self->{verbose}) { |
if ($self->{LOG_VERBOSE}) { |
357 |
$configurator->{verbose} = 1; |
$configurator->{verbose} = 1; |
358 |
} |
} |
359 |
|
|