Check that we have defined a shadow db before trying to use it.

diff --git a/globals.pl b/globals.pl
index 4187060707a027af658562eedc6683f6c1485319..b4d42e94d08761a16da0c68602cf521064ac84fd 100644 (file)
--- a/globals.pl
+++ b/globals.pl
@@ -80,7 +80,7 @@ sub ConnectToDatabase {
     my ($useshadow) = (@_);
     if (!defined $::db) {
         my $name = $db_name;
-        if ($useshadow) {
+        if ($useshadow && Param("shadowdb")) {
             $name = Param("shadowdb");
             $::dbwritesallowed = 0;
         }