Graph finish DRY Axes change

mohawk2 · mohawk2 · commit 14dadbf55590 · 2026-04-12T00:09:29.000+01:00
diff --git a/lib/PDL/Graphics/TriD/Graph.pm b/lib/PDL/Graphics/TriD/Graph.pm
@@ -113,7 +113,7 @@ use constant { DEFAULT_AXIS=>'Euclid3', DEFAULT_AXIS_CLASS=>'PDL::Graphics::TriD
 sub default_axes {
   my ($this) = @_;
   return if $this->{Axis}{DEFAULT_AXIS()};
-  $this->set_axis(PDL::Graphics::TriD::EuclidAxes->new(),DEFAULT_AXIS);
+  $this->set_axis(DEFAULT_AXIS_CLASS->new(),DEFAULT_AXIS);
   $this->set_default_axis(DEFAULT_AXIS,DEFAULT_INDICES);
 }
 

Original file line number	Diff line number	Diff line change
`@@ -113,7 +113,7 @@ use constant { DEFAULT_AXIS=>'Euclid3', DEFAULT_AXIS_CLASS=>'PDL::Graphics::TriD`
`113`	`113`	`sub default_axes {`
`114`	`114`	`my ($this) = @_;`
`115`	`115`	`return if $this->{Axis}{DEFAULT_AXIS()};`
`116`		`- $this->set_axis(PDL::Graphics::TriD::EuclidAxes->new(),DEFAULT_AXIS);`
	`116`	`+ $this->set_axis(DEFAULT_AXIS_CLASS->new(),DEFAULT_AXIS);`
`117`	`117`	`$this->set_default_axis(DEFAULT_AXIS,DEFAULT_INDICES);`
`118`	`118`	`}`
`119`	`119`