unbreak place_hold action

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm
index b0d39ce..5bc2f56 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm
@@ -2498,7 +2498,7 @@ sub load_myopac_bookbag_update {
 
     # bail out if user is attempting an action that requires
     # that at least one list item be selected
-    if ((scalar(@selected_item) == 0) &&
+    if ((scalar(@selected_item) == 0) && (scalar(@hold_recs) == 0) &&
         ($action eq 'place_hold' || $action eq 'print' ||
          $action eq 'email' || $action eq 'del_item')) {
         my $url = $self->ctx->{referer};
@@ -2562,7 +2562,7 @@ sub load_myopac_bookbag_update {
 
     } elsif($action eq 'place_hold') {
 
-        # @hold_recs comes from anon lists redirect; selected_itesm comes from existing buckets
+        # @hold_recs comes from anon lists redirect; selected_items comes from existing buckets
         unless (@hold_recs) {
             if (@selected_item) {
                 my $items = $e->search_container_biblio_record_entry_bucket_item({id => \@selected_item});

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Container.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Container.pm
index aba9d85..5ff10de 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Container.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Container.pm
@@ -265,8 +265,8 @@ sub load_mylist_move {
 
     my ($cache_key, $list) = $self->fetch_mylist;
 
-    if ((scalar(@rec_ids) == 0) ||
-        ($self->cgi->param('entire_list') && scalar(@$list) == 0)) {
+    unless ((scalar(@rec_ids) > 0) ||
+        ($self->cgi->param('entire_list') && scalar(@$list) > 0)) {
         my $url = $self->ctx->{referer};
         $url .= ($url =~ /\?/ ? '&' : '?') . 'cart_none_selected=1';
         return $self->generic_redirect($url);