- Imager::Graph::Horizontal::add_column_data_series() renamed to
[imager-graph.git] / Graph.pm
index fc96184..13f1a98 100644 (file)
--- a/Graph.pm
+++ b/Graph.pm
@@ -2519,10 +2519,16 @@ sub _box {
       $self->_line(x1 => $xmin+1, y1 => $ymax, x2 => $xmax-1, y2 => $ymax, %work_opts);
     }
     $self->_line(x1 => $xmin, y1 => $ymin, x2 => $xmin, y2 => $ymax, %work_opts);
-    return $self->_line(x1 => $xmin, y1 => $ymin, x2 => $xmin, y2 => $ymax, %work_opts);
+    return $self->_line(x1 => $xmax, y1 => $ymin, x2 => $xmax, y2 => $ymax, %work_opts);
   }
 }
 
+sub _feature_enabled {
+  my ($self, $name) = @_;
+
+  return $self->{_style}{features}{$name};
+}
+
 1;
 __END__