Prevent an unitialized variable warning when loading OpenILS::WWW::EgWeb
authordbs <dbs@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 1 Mar 2011 22:27:43 +0000 (22:27 +0000)
committerdbs <dbs@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Tue, 1 Mar 2011 22:27:43 +0000 (22:27 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@19555 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/lib/OpenILS/WWW/EGWeb.pm

index 42eb6ff..ec765af 100644 (file)
@@ -18,7 +18,7 @@ my $web_config_edit_time;
 
 sub import {
     my $self = shift;
-    $web_config_file = shift;
+    $web_config_file = shift || '';
     unless(-r $web_config_file) {
         warn "Invalid web config $web_config_file";
         return;