From: senator <lebbeous@esilibrary.com>
Date: Thu, 10 Feb 2011 22:24:05 +0000 (-0500)
Subject: advanced page doesn't need login first
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=3cb8145f8b5ad8ad16b5fef6b6366d394b3f0c9f;p=evergreen%2Fequinox.git

advanced page doesn't need login first
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm
index 3a62f4ff10..f303af7941 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader.pm
@@ -71,7 +71,8 @@ sub load {
 
     my $path = $self->apache->path_info;
 
-    return $self->load_home if $path =~ /opac\/home/;
+    return $self->load_simple("home") if $path =~ /opac\/home/;
+    return $self->load_simple("advanced") if $path =~ /opac\/advanced/;
     return $self->load_login if $path =~ /opac\/login/;
     return $self->load_logout if $path =~ /opac\/logout/;
     return $self->load_rresults if $path =~ /opac\/results/;
@@ -243,9 +244,9 @@ sub load_common {
     return Apache2::Const::OK;
 }
 
-sub load_home {
-    my $self = shift;
-    $self->ctx->{page} = 'home';
+sub load_simple {
+    my ($self, $page) = @_;
+    $self->ctx->{page} = $page;
     return Apache2::Const::OK;
 }