provide an explicit import() sub to collect the boostrap config name at import. ...
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 18 Aug 2010 17:40:16 +0000 (17:40 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 18 Aug 2010 17:40:16 +0000 (17:40 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@17250 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/WWW/PasswordReset.pm

index 2e3fc2f..17ec305 100644 (file)
@@ -44,6 +44,12 @@ my $U = 'OpenILS::Application::AppUtils';
 
 my ($bootstrap, $actor, $templates);
 my $i18n = {};
+my $init_done = 0; # has child_init been called?
+
+sub import {
+    my $self = shift;
+    $bootstrap = shift;
+}
 
 sub child_init {
     OpenSRF::System->bootstrap_client( config_file => $bootstrap );
@@ -54,10 +60,14 @@ sub child_init {
     $templates = $conf->config_value("dirs", "templates");
     $actor = OpenSRF::AppSession->create('open-ils.actor');
     load_i18n();
+    $init_done = 1;
 }
 
 sub password_reset {
     my $apache = shift;
+
+    child_init() unless $init_done;
+
     return Apache2::Const::DECLINED if (-e $apache->filename);
 
     $apache->content_type('text/html');