From: erickson Date: Fri, 26 Jun 2009 15:09:40 +0000 (+0000) Subject: open-ils.actor.org_setting.delete is not used. removing to reduce possible org-setti... X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=a591432cdabc8f63cdb2d17a0a1a592bcecfc0a9;p=evergreen%2Ftadl.git open-ils.actor.org_setting.delete is not used. removing to reduce possible org-settings churn as new table is added. use open-ils.actor.org_unit.settings.update instead git-svn-id: svn://svn.open-ils.org/ILS/trunk@13472 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm index 87ac173f20..9e7dffff78 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm @@ -228,47 +228,6 @@ sub ou_ancestor_setting_batch { -__PACKAGE__->register_method ( - method => "ou_setting_delete", - api_name => 'open-ils.actor.org_setting.delete', - signature => q/ - Deletes a specific org unit setting for a specific location - @param authtoken The login session key - @param orgid The org unit whose setting we're changing - @param setting The name of the setting to delete - @return True value on success. - / -); - -sub ou_setting_delete { - my( $self, $conn, $authtoken, $orgid, $setting ) = @_; - my( $reqr, $evt) = $U->checkses($authtoken); - return $evt if $evt; - $evt = $U->check_perms($reqr->id, $orgid, 'UPDATE_ORG_SETTING'); - return $evt if $evt; - - my $id = $U->cstorereq( - 'open-ils.cstore.direct.actor.org_unit_setting.id_list', - { name => $setting, org_unit => $orgid } ); - - $logger->debug("Retrieved setting $id in org unit setting delete"); - - my $s = $U->cstorereq( - 'open-ils.cstore.direct.actor.org_unit_setting.delete', $id ); - - $logger->activity("User ".$reqr->id." deleted org unit setting $id") if $s; - return $s; -} - - - - - - - - - - __PACKAGE__->register_method( method => "update_patron",