debuging
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Thu, 28 Jul 2005 21:24:28 +0000 (21:24 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Thu, 28 Jul 2005 21:24:28 +0000 (21:24 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@1575 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Storage.pm
Open-ILS/src/perlmods/OpenILS/Application/Storage/WORM.pm

index d3ad360..9d273d6 100644 (file)
@@ -42,11 +42,15 @@ sub initialize {
        eval 'use OpenILS::Application::Storage::Publisher;';
        if ($@) {
                $log->debug("FAILURE LOADING Publisher!  $@", ERROR);
+               throw OpenILS::EX::PANIC ( "FAILURE LOADING Publisher!  :  $@" );
        }
        eval 'use OpenILS::Application::Storage::WORM;';
        if ($@) {
                $log->debug("FAILURE LOADING WORM!  $@", ERROR);
+               throw OpenILS::EX::PANIC ( "FAILURE LOADING WoRM!  :  $@" );
        }
+
+       $log->debug("We seem to be OK...",DEBUG);
 }
 
 sub child_init {
index fbf3216..2f6eb42 100644 (file)
@@ -4,6 +4,7 @@ use strict; use warnings;
 
 use OpenSRF::EX qw/:try/;
 
+use OpenSRF::Utils::SettingsClient;
 use OpenSRF::Utils::Logger qw/:level/;
 my $log = 'OpenSRF::Utils::Logger';