Skip to content

Commit

Permalink
Tweak appearance
Browse files Browse the repository at this point in the history
  • Loading branch information
davorg committed Apr 9, 2015
1 parent 13cc3cc commit 67148c5
Show file tree
Hide file tree
Showing 2 changed files with 57 additions and 47 deletions.
6 changes: 3 additions & 3 deletions Genealogy/Chart/SVG.pm
Expand Up @@ -58,7 +58,7 @@ has bar_height => (
has years => (
is => 'ro',
isa => 'Int',
default => 200,
default => 250,
);

# The number of horizontal pixels to use for each year
Expand Down Expand Up @@ -151,8 +151,8 @@ sub person {
$text .= $d if $d;
$text .= ')';
$self->text(
x => ( $self->left - $until + 2 ) * $self->pixels_per_year,
y => ( $self->height * y_pos($n) ) + ( $self->bar_height / 2 ) - 3,
x => ( $self->left - $until + 1 ) * $self->pixels_per_year,
y => ( $self->height * y_pos($n) ) + ( $self->bar_height / 2 ) - 4,
'font-size' => $self->bar_height - 4
)->cdata($text);
}
Expand Down
98 changes: 54 additions & 44 deletions tree.svg
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.

0 comments on commit 67148c5

Please sign in to comment.