From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 25 Mar 2010 13:33:01 +0000 (+0000)
Subject: removed unused vars for clarity, make use of the depth var instead of referencing... 
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=64bbd28fe81b6a3bc7115b207518c10bbd321774;p=evergreen%2Fmasslnc.git

removed unused vars for clarity, make use of the depth var instead of referencing the original call params (apologies for the extra commits)

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

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
index 84b196186f..b3dbe9ee5e 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
@@ -1411,13 +1411,8 @@ sub check_title_hold {
 	my( $self, $client, $authtoken, $params ) = @_;
 
     my %params       = %$params;
-    my $titleid      = $params{titleid}      || "";
-    my $volid        = $params{volume_id};
-    my $copyid       = $params{copy_id};
-    my $mrid         = $params{mrid}         || "";
     my $depth        = $params{depth}        || 0;
     my $pickup_lib   = $params{pickup_lib};
-    my $hold_type    = $params{hold_type}    || 'T';
     my $selection_ou = $params{selection_ou} || $pickup_lib;
 
 	my $e = new_editor(authtoken=>$authtoken);
@@ -1438,13 +1433,13 @@ sub check_title_hold {
     my $soft_boundary = $U->ou_ancestor_setting_value($selection_ou, OILS_SETTING_HOLD_SOFT_BOUNDARY);
     my $hard_boundary = $U->ou_ancestor_setting_value($selection_ou, OILS_SETTING_HOLD_HARD_BOUNDARY);
 
-    if(defined $soft_boundary and $$params{depth} < $soft_boundary) {
+    if(defined $soft_boundary and $depth < $soft_boundary) {
         # work up the tree and as soon as we find a potential copy, use that depth
         # also, make sure we don't go past the hard boundary if it exists
 
         # our min boundary is the greater of user-specified boundary or hard boundary
-        my $min_depth = (defined $hard_boundary and $hard_boundary > $$params{depth}) ?  
-            $hard_boundary : $$params{depth};
+        my $min_depth = (defined $hard_boundary and $hard_boundary > $depth) ?  
+            $hard_boundary : $depth;
 
         my $depth = $soft_boundary;
         while($depth >= $min_depth) {
@@ -1453,7 +1448,7 @@ sub check_title_hold {
             return {success => 1, depth => $depth, local_avail => $status[1]} if $status[0];
             $depth--;
         }
-    } elsif(defined $hard_boundary and $$params{depth} < $hard_boundary) {
+    } elsif(defined $hard_boundary and $depth < $hard_boundary) {
         # there is no soft boundary, enforce the hard boundary if it exists
         $logger->info("performing hold possibility check with hard boundary $hard_boundary");
         my @status = do_possibility_checks($e, $patron, $request_lib, $hard_boundary, %params);