circ.checkedout only returns items that are actually checked out
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Thu, 17 Nov 2005 15:47:59 +0000 (15:47 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Thu, 17 Nov 2005 15:47:59 +0000 (15:47 +0000)
and not all circulations
fixed some typos

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

Open-ILS/src/perlmods/OpenILS/Application/Circ.pm
Open-ILS/src/perlmods/OpenILS/Application/Circ/Rules.pm

index 6eb4ce8..55d1af8 100644 (file)
@@ -45,7 +45,8 @@ sub checkouts_by_user {
        if(!$user_id) { $user_id = $user_obj->id(); }
 
        my $circs = $session->request(
-               "open-ils.storage.direct.action.open_circulation.search.usr.atomic", $user_id );
+               "open-ils.storage.direct.action.open_circulation.search.atomic", 
+               { usr => $user_id, stop_fines => undef } );
        $circs = $circs->gather(1);
 
        my @results;
index 6205fc1..986077c 100644 (file)
@@ -472,11 +472,11 @@ sub circulate {
        $circ->circ_lib($user->home_ou);
 
        if($isrenew) {
-               warn "Renewing circ.... ".$circ->id ." and setting num renews to " . $numrenews - 1 . "\n";
+               warn "Renewing circ.... and setting num renews to " . $numrenews - 1 . "\n";
                $circ->opac_renewal(1); # XXX different for different types ! 
                $circ->clear_id;
                $circ->renewal_remaining($numrenews - 1);
-               $circ->circ_staff($patron->id);
+               $circ->circ_staff($patron);
        } else {
                $circ->circ_staff($user->id);
        }