if no login redirect is set, redirect to account instead of home page

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm
index f19930c..43a679f 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm
@@ -239,12 +239,12 @@ sub load_login {
 
     # login succeeded, redirect as necessary
 
-    my $home = $self->apache->unparsed_uri;
-    $home =~ s/\/login/\/home/;
+    my $acct = $self->apache->unparsed_uri;
+    $acct =~ s#/login#/myopac/main#;
 
     $self->apache->print(
         $cgi->redirect(
-            -url => $cgi->param('redirect_to') || $home,
+            -url => $cgi->param('redirect_to') || $acct,
             -cookie => $cgi->cookie(
                 -name => 'ses',
                 -path => '/',