diff --git a/HexGrid.pm b/HexGrid.pm index 584e3f6..7f45a1a 100644 --- a/HexGrid.pm +++ b/HexGrid.pm @@ -38,7 +38,6 @@ sub make_region($this, $name, %defaults) sub get_tile_at($this, $nw, $sw) { - # return $this->{tiles}{$nw}{$sw} if exists $this->{tiles}{$nw}{$sw}; foreach my $region (keys $this->{regions}->%*) { return $this->{regions}{$region}{tiles}{$nw}{$sw} if exists $this->{regions}{$region}{tiles}{$nw}{$sw}; @@ -78,8 +77,6 @@ sub render($this) $svg->{-docref}{-document}{id}='grid-root'; $svg->{-docref}{-document}{version}='1.2'; - # $svg->tag('textArea', width => "300", height => "300")->cdata("this is sum text like a bunch."); - # $svg->foreignObject(width => "300", height => "300")->tag('div', xmlns => "http://www.w3.org/1999/xhtml")->cdata('foo'); return $svg->xmlify; } diff --git a/HexGrid/Region.pm b/HexGrid/Region.pm index 48f321a..584fd73 100644 --- a/HexGrid/Region.pm +++ b/HexGrid/Region.pm @@ -21,7 +21,6 @@ sub add_tile($this, $tile) { $this->{tiles}{$tile->{nw}}{$tile->{sw}} = $tile; } sub make_tile_at($this, $nw, $sw, %tile_settings) { my %settings = %{merge(\%tile_settings, $this->{defaults})}; - # say STDERR Dumper(\%settings); $settings{css_class} = HexGrid::to_id($this->{name}); $this->add_tile(HexGrid::Tile::at($nw, $sw, %settings)); }