File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -182,9 +182,9 @@ sub usage {
182
182
$help && usage();
183
183
184
184
# internals
185
- my $ypad1 = $fontsize * 4 ; # pad top, include title
185
+ my $ypad1 = $fontsize * 3 ; # pad top, include title
186
186
my $ypad2 = $fontsize * 2 + 10; # pad bottom, include labels
187
- my $ypad3 = $fontsize * 2 + 1; # pad top, include subtitle (optional)
187
+ my $ypad3 = $fontsize * 2; # pad top, include subtitle (optional)
188
188
my $xpad = 10; # pad lefm and right
189
189
my $framepad = 1; # vertical padding for frames
190
190
my $depthmax = 0;
@@ -678,7 +678,7 @@ sub flow {
678
678
}
679
679
680
680
# draw canvas, and embed interactive JavaScript program
681
- my $imageheight = ($depthmax * $frameheight ) + $ypad1 + $ypad2 ;
681
+ my $imageheight = (( $depthmax + 1) * $frameheight ) + $ypad1 + $ypad2 ;
682
682
$imageheight += $ypad3 if $subtitletext ne " " ;
683
683
my $im = SVG-> new();
684
684
$im -> header($imagewidth , $imageheight );
You can’t perform that action at this time.
0 commit comments