commit 00d36026f8bbd4d45c052c2937a190c47b06c7da
parent 490ba79e5aaa2d7f1b720858f10823a095027e13
Author: Kyle Milz <kyle@getaddrinfo.net>
Date: Sat, 1 Nov 2014 16:28:17 -0600
gen_svg: add ticks for x axis labels
Diffstat:
1 file changed, 7 insertions(+), 0 deletions(-)
diff --git a/gen_svg.pl b/gen_svg.pl
@@ -121,6 +121,13 @@ for my $part_num (@$part_nums) {
$svg->text(id => $time, x => $x, y => 250,
style => "font-size: 12px; fill: #666",
"text-anchor" => "middle")->cdata($date);
+ $svg->line(id => "date_marker_$i",
+ x1 => $x, y1 => $margin_top + $height,
+ x2 => $x, y2 => $margin_top + $height + 5,
+ "fill" => "#CCC",
+ "stroke" => "#CCC",
+ "stroke-width" => 1,
+ );
}
open my $svg_fh, ">", "$svg_dir/$part_num.svg" or die $!;