[open-ils-commits] r10337 - trunk/Open-ILS/src/perlmods/OpenILS/Application

[svn at svn.open-ils.org]

Author: erickson
Date: 2008-08-11 14:35:35 -0400 (Mon, 11 Aug 2008)
New Revision: 10337

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
Log:
pull circ mods from the db and not the settings server

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm	2008-08-11 17:32:34 UTC (rev 10336)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Circ.pm	2008-08-11 18:35:35 UTC (rev 10337)
@@ -67,9 +67,10 @@
 	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' );
+    my($self, $conn, $args) = @_;
+    my $mods = new_editor()->retrieve_all_config_circ_modifier;
+    return [ map {$_->code} @$mods ] unless $$args{full};
+    return $mods;
 }
 
 __PACKAGE__->register_method(