Merge pull request #1338 from somiaj/fix-fraction-equal-comparision

dlglin · web-flow · commit c37311d5455a · 2025-11-25T12:57:24.000-07:00
Use same context when creating a new context::Fraction::Parser::Number
diff --git a/macros/contexts/contextFraction.pl b/macros/contexts/contextFraction.pl
@@ -789,7 +789,7 @@ package context::Fraction::Parser::Number;
 
 sub new {
 	my $self = shift;
-	my $num  = &{ $self->super('new') }($self, @_);
+	my $num  = &{ $self->super('new', $_[0]->context) }($self, @_);
 	$num->setExtensionClass('INTEGER') if $num->{value_string} =~ m/^[-+]?[0-9]+$/;
 	return $num->mutate;
 }

Original file line number	Diff line number	Diff line change
`@@ -789,7 +789,7 @@ package context::Fraction::Parser::Number;`
`789`	`789`
`790`	`790`	`sub new {`
`791`	`791`	`my $self = shift;`
`792`		`- my $num = &{ $self->super('new') }($self, @_);`
	`792`	`+ my $num = &{ $self->super('new', $_[0]->context) }($self, @_);`
`793`	`793`	`$num->setExtensionClass('INTEGER') if $num->{value_string} =~ m/^[-+]?[0-9]+$/;`
`794`	`794`	`return $num->mutate;`
`795`	`795`	`}`