From e606cad30491370103f7081bc6aa5fd46b175289 Mon Sep 17 00:00:00 2001
From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 28 Jul 2005 21:24:28 +0000
Subject: [PATCH] debuging

git-svn-id: svn://svn.open-ils.org/ILS/trunk@1575 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/Application/Storage.pm      | 4 ++++
 Open-ILS/src/perlmods/OpenILS/Application/Storage/WORM.pm | 1 +
 2 files changed, 5 insertions(+)

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage.pm
index d3ad360d4f..9d273d6eb4 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage.pm
@@ -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 {
diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/WORM.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/WORM.pm
index fbf32169b8..2f6eb428b6 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/WORM.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/WORM.pm
@@ -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';
 
-- 
2.43.2