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 4e9299a73e85e43a0b9cfaedaf30e6709702ea22..fd042f43630baab845f9e282a8d5c8932f93e7af 100755 (executable)
--- a/showdependencygraph.cgi
+++ b/showdependencygraph.cgi
@@ -271,7 +271,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;