From ee400b45d9ae07a962172a24e61c417a8e0abf18 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Fri, 21 Jan 2011 10:20:36 -0500 Subject: [PATCH] don't muck w/ media_prefix if it's unset --- Open-ILS/src/perlmods/OpenILS/WWW/EGWeb.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/EGWeb.pm b/Open-ILS/src/perlmods/OpenILS/WWW/EGWeb.pm index 3929285991..4980f792a5 100644 --- a/Open-ILS/src/perlmods/OpenILS/WWW/EGWeb.pm +++ b/Open-ILS/src/perlmods/OpenILS/WWW/EGWeb.pm @@ -122,7 +122,7 @@ sub load_context { $ctx->{theme} . ' : locale = ' . $ctx->{locale}); my $mprefix = $ctx->{media_prefix}; - if($mprefix !~ /^http/ and $mprefix !~ /^\//) { + if($mprefix and $mprefix !~ /^http/ and $mprefix !~ /^\//) { # if a hostname is provided /w no protocol, match the protocol to the current page $ctx->{media_prefix} = ($cgi->https) ? "https://$mprefix" : "http://$mprefix"; } -- 2.11.0