Changeset 25022 for branches/eam_branches/20090715/Nebulous-Server/lib/Nebulous/Server/Config.pm

Timestamp:

Aug 7, 2009, 12:45:24 PM (17 years ago)

Author:

eugene

Message:

update from mainline

Location:

branches/eam_branches/20090715

Files:

• . (modified) (1 prop)
• Nebulous-Server/lib/Nebulous/Server/Config.pm (modified) (3 diffs)

branches/eam_branches/20090715/Nebulous-Server/lib/Nebulous/Server/Config.pm

@@ -13 +13 @@
 
 use Log::Log4perl qw( :levels );
-use Params::Validate qw( validate validate_pos SCALAR ARRAYREF );
+use Params::Validate qw( validate validate_pos SCALAR ARRAYREF UNDEF );
 
 our %LEVELS = (
@@ -32 +32 @@
     dsn         => { type => SCALAR },
     dbuser      => { type => SCALAR },
-    dbpasswd    => { type => SCALAR },
+    dbpasswd    => { type => SCALAR | UNDEF },
 };
 
@@ -48 +48 @@
     dsn                 => { type => SCALAR, optional => 1 },
     dbuser              => { type => SCALAR, optional => 1 },
-    dbpasswd            => { type => SCALAR, optional => 1 },
+    dbpasswd            => { type => SCALAR | UNDEF, optional => 1 },
     memcached_servers   => { type => ARRAYREF, optional => 1 },
 };