--- nfo/perl/libs/DesignPattern/Logger.pm	2003/03/29 07:16:00	1.4
+++ nfo/perl/libs/DesignPattern/Logger.pm	2003/05/13 08:40:15	1.5
@@ -1,7 +1,10 @@
 ## ------------------------------------------------------------------------
-##  $Id: Logger.pm,v 1.4 2003/03/29 07:16:00 joko Exp $
+##  $Id: Logger.pm,v 1.5 2003/05/13 08:40:15 joko Exp $
 ## ------------------------------------------------------------------------
 ##  $Log: Logger.pm,v $
+##  Revision 1.5  2003/05/13 08:40:15  joko
+##  minor update: renamed attribute
+##
 ##  Revision 1.4  2003/03/29 07:16:00  joko
 ##  minor update: changed default log-file-name to 'perl_app.log'
 ##
@@ -350,7 +353,7 @@
         $configurator->{screen_min_level} = 'debug';
       }
       
-      if ($self->{verbose}) {
+      if ($self->{LOG_VERBOSE}) {
         $configurator->{verbose} = 1;
       }