Bommels05/Mozilla
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Patch for bug 225359: Drawing dependency graphs should work on Win32; patch by Byron Jones (glob) <bugzilla@glob.com.au>; r=jouni; a=justdave.

Browse Source 
git-svn-id: svn://10.0.0.236/trunk@158296 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
jocuri%softhome.net
2004-06-22 08:05:49 +00:00
parent c5d80b54e2
commit aa92e3c4b0
1 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
mozilla/webtools/bugzilla/showdependencygraph.cgi
View File

@@ -226,14 +226,19 @@ if ($webdotbase =~ /^https?:/) {
# First, generate the png image file from the .dot source
my $dotfh;
my ($pngfh, $pngfilename) = File::Temp::tempfile("XXXXXXXXXX",
SUFFIX => '.png',
DIR => $webdotdir);
open (DOT, '-|') or exec ($webdotbase, "-Tpng", $filename);
binmode $pngfh;
open(DOT, "$webdotbase -Tpng $filename|");
binmode DOT;
print $pngfh $_ while <DOT>;
close DOT;
close $pngfh;
# On Windows $pngfilename will contain \ instead of /
$pngfilename =~ s|\\|/|g if $^O eq 'MSWin32';
$vars->{'image_url'} = $pngfilename;
# Then, generate a imagemap datafile that contains the corner data
@@ -243,7 +248,9 @@ if ($webdotbase =~ /^https?:/) {
my ($mapfh, $mapfilename) = File::Temp::tempfile("XXXXXXXXXX",
SUFFIX => '.map',
DIR => $webdotdir);
open (DOT, '-|') or exec ($webdotbase, "-Tismap", $filename);
binmode $mapfh;
open(DOT, "$webdotbase -Tismap $filename|");
binmode DOT;
print $mapfh $_ while <DOT>;
close DOT;
close $mapfh;