Add bookbags to context of prefs_notify page

Signed-off-by: Jeff Godin <jgodin@tadl.org>

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 9dc7f73..8fb8ec0 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm
@@ -193,6 +193,14 @@ sub load_myopac_prefs_notify {
 
     $self->ctx->{opt_in_settings} = $user_prefs;
 
+    $self->ctx->{bookbags} = $e->search_container_biblio_record_entry_bucket(
+        [
+            {owner => $self->ctx->{user}->id, btype => 'bookbag'}, {
+                order_by => {cbreb => 'name'}
+            }
+        ]
+    );
+
     return Apache2::Const::OK
         unless $self->cgi->request_method eq 'POST';