graph changes

This commit is contained in:
Max Baker
2004-02-13 06:19:20 +00:00
parent b46aa416a0
commit 607d5f04bd

View File

@@ -31,9 +31,10 @@ if ($@) {
} }
} }
my $now = scalar localtime;
my $gvds = GraphViz::Data::Structure->new(\%graph,Orientation=>'vertical', my $gvds = GraphViz::Data::Structure->new(\%graph,Orientation=>'vertical',
Colors=> 'Deep', Colors=> 'Deep',
graph => {label=>'SNMP::Info and Netdisco Supported Devices','fontpath'=>'/usr/local/netdisco','fontname'=>'lucon',concentrate=>'true','overlap'=>'false',spline=>'true',bgcolor=>'wheat'}, graph => {label=>"SNMP::Info and Netdisco Supported Devices \n $now",'fontpath'=>'/usr/local/netdisco','fontname'=>'lucon',concentrate=>'true','overlap'=>'false',spline=>'true',bgcolor=>'wheat'},
node => {fontname=>'lucon'}, node => {fontname=>'lucon'},
); );
$gvds->graph()->as_png($DevPNG); $gvds->graph()->as_png($DevPNG);