From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Sun, 6 Aug 2006 23:07:01 +0000 (+0000)
Subject: added method to return the list of circ_modifiers from the config
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=ccc59589ca2a2dcd034e5d2a018eb3e66f1c25c1;p=Evergreen.git

added method to return the list of circ_modifiers from the config


git-svn-id: svn://svn.open-ils.org/ILS/trunk@5321 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
index d52de29a78..93f7abbe55 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
@@ -24,6 +24,7 @@ use OpenILS::Utils::Fieldmapper;
 use OpenILS::Utils::Editor q/:funcs/;
 use OpenILS::Utils::CStoreEditor q/:funcs/;
 use OpenILS::Const qw/:const/;
+use OpenSRF::Utils::SettingsClient;
 
 my $apputils = "OpenILS::Application::AppUtils";
 my $U = $apputils;
@@ -60,6 +61,18 @@ sub retrieve_circ {
 }
 
 
+__PACKAGE__->register_method(
+	method => 'fetch_circ_mods',
+	api_name => 'open-ils.circ.circ_modifier.retrieve.all'
+);
+
+sub fetch_circ_mods {
+	my $conf = OpenSRF::Utils::SettingsClient->new;
+	return $conf->config_value(
+		'apps', 'open-ils.circ', 'app_settings', 'circ_modifiers', 'mod' );
+}
+
+
 # ------------------------------------------------------------------------
 # Returns an array of {circ, record} hashes checked out by the user.
 # ------------------------------------------------------------------------