From: Jason Stephenson <jason@sigio.com>
Date: Sun, 7 Jul 2019 11:02:54 +0000 (-0400)
Subject: Add comments to affected storage modules
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=f6d545c369bd5666c58869f807e571d1478ef25e;p=working%2FEvergreen.git

Add comments to affected storage modules
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI.pm
index 0d1a158e00..ac5779494d 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI.pm
@@ -6,6 +6,10 @@ BEGIN {
 use base qw/Class::DBI/;
 use Class::DBI::AbstractSearch;
 
+# The following modules add, or use, subroutines in modules that are
+# not available when this module is compiled.  We therefore "require"
+# these modules rather than "use" them.  Everything is available at
+# run time.
 require OpenILS::Application::Storage::CDBI::actor;
 require OpenILS::Application::Storage::CDBI::action;
 require OpenILS::Application::Storage::CDBI::booking;
diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg.pm
index f5115360cf..6105d7ae50 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/Driver/Pg.pm
@@ -10,10 +10,15 @@
   # OpenILS::Application::Storage.
   #-------------------------------------------------------------------------------
     package OpenILS::Application::Storage::Driver::Pg;
+    # The following modules add, or use, subroutines in modules that
+    # are not available when this module is compiled.  We therefore
+    # "require" these modules rather than "use" them.  Everything is
+    # available at run time.
     require OpenILS::Application::Storage::Driver::Pg::cdbi;
     require OpenILS::Application::Storage::Driver::Pg::fts;
     require OpenILS::Application::Storage::Driver::Pg::storage;
     require OpenILS::Application::Storage::Driver::Pg::dbi;
+
     use UNIVERSAL::require; 
     BEGIN {                 
         'Class::DBI::Frozen::301'->use or 'Class::DBI'->use or die $@;