logic bug from constants switch

git-svn-id: svn://svn.open-ils.org/ILS/trunk@5320 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 86d3a10..810923b 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Circ/Holds.pm
@@ -868,11 +868,11 @@ sub fetch_captured_holds {
        );
 
        my @res;
-       my $stat = OILS_COPY_STATUS_ON_HOLDS_SHELF;
        for my $h (@$holds) {
                my $copy = $e->retrieve_asset_copy($h->current_copy)
                        or return $e->event;
-               push( @res, $h ) if $copy->status == $stat->id; # eventually, push IDs here
+               push( @res, $h ) if 
+                       $copy->status == OILS_COPY_STATUS_ON_HOLDS_SHELF;
        }
 
        return \@res;