--- nfo/perl/scripts/outlook2ldap/libs/Torus/Logger.pm	2003/01/18 18:27:43	1.1
+++ nfo/perl/scripts/outlook2ldap/libs/Torus/Logger.pm	2003/01/19 03:35:26	1.2
@@ -1,23 +1,33 @@
-package Torus::Logger;
-
-use strict;
-use warnings;
-
+##    ------------------------------------------------------------------------
+##    $Id: Logger.pm,v 1.2 2003/01/19 03:35:26 joko Exp $
+##    ------------------------------------------------------------------------
+##    $Log: Logger.pm,v $
+##    Revision 1.2  2003/01/19 03:35:26  joko
+##    + added cvs-header
+##
+##    ------------------------------------------------------------------------
+
+
+package Torus::Logger;
+
+use strict;
+use warnings;
+
 #require "$basepath/etc/log/Config.pm";
 #BEGIN {
   use FindBin qw($Bin);
   #require "$Bin/use_libs.pl";
 #}
-
-
-use Log::Dispatch::Configurator::Hardwired;
-use Log::Dispatch::Config;
+
+
+use Log::Dispatch::Configurator::Hardwired;
+use Log::Dispatch::Config;
 
 my $bool_quiet = grep /--quiet/, @ARGV;
 my $bool_debug = grep /--debug/, @ARGV;
 my $bool_verbose = grep /--verbose/, @ARGV;
 configureLogDispatcher( { quiet => $bool_quiet, debug => $bool_debug, verbose => $bool_verbose } );
-
+
 sub configureLogDispatcher {
   my $args = shift;
   my $logHandlerMeta = Log::Dispatch::Configurator::Hardwired->new();
@@ -40,5 +50,5 @@
 
   Log::Dispatch::Config->configure($logHandlerMeta);
 }
-
-1;
+
+1;