Bug 370398: Dependency graph wrong url path under mod_perl

Patch By Max Kanat-Alexander <mkanat@bugzilla.org> r=LpSolit, a=LpSolit

diff --git a/showdependencygraph.cgi b/showdependencygraph.cgi
index 806d80ab5b9014cd5a0be9dbb2bdedc81e213326..0d7430497806cb673b044396454b65eb1d241db0 100755 (executable)
--- a/showdependencygraph.cgi
+++ b/showdependencygraph.cgi
@@ -249,7 +249,7 @@ if ($webdotbase =~ /^https?:/) {
     # Under mod_perl, pngfilename will have an absolute path, and we
     # need to make that into a relative path.
     my $cgi_root = bz_locations()->{cgi_path};
-    $pngfilename =~ s/^\Q$cgi_root\E//;
+    $pngfilename =~ s#^\Q$cgi_root\E/?##;
     
     $vars->{'image_url'} = $pngfilename;