Changeset 17072 for trunk/Nebulous-Server/lib/Nebulous/Server/Config.pm

Timestamp:

Mar 20, 2008, 11:13:28 AM (18 years ago)

Author:

jhoblitt

Message:

server/client split

File:

• trunk/Nebulous-Server/lib/Nebulous/Server/Config.pm (modified) (2 diffs)

trunk/Nebulous-Server/lib/Nebulous/Server/Config.pm

@@ -1 +1 @@
 # Copyright (C) 2005  Joshua Hoblitt
 #
-# $Id: Config.pm,v 1.2 2006-12-12 00:06:27 jhoblitt Exp $
+# $Id: Config.pm,v 1.3 2008-03-20 21:10:57 jhoblitt Exp $
 
 package Nebulous::Server::Config;
@@ -12 +12 @@
 use base qw( Class::Accessor::Fast );
 
-use Nebulous::Util qw( %LEVELS );
+use Log::Log4perl qw( :levels );
 use Params::Validate qw( validate SCALAR );
+
+our %LEVELS = (
+    off     => $OFF,
+    fatal   => $FATAL,
+    error   => $ERROR,
+    warn    => $WARN,
+    info    => $INFO,
+    debug   => $DEBUG,
+    all     => $ALL,
+);
 
 my $new_validate = {