fix: correct + method dispatch behavior for R >= 4.3.0 (#6561)

Yunuuuu · web-flow · commit bed8e32d45c7 · 2025-07-21T08:56:57.000+02:00
diff --git a/R/zzz.R b/R/zzz.R
@@ -31,8 +31,10 @@ on_load(
   }
 )
 
+# In R >= 4.3.0, S7 methods fall back to base Ops behavior when one of the
+# arguments is not an S7 object. This ensures compatibility in such cases.
 on_load(
-  if (getRversion() > "4.3.0") registerS3method("+", "gg", add_gg)
+  if (getRversion() >= "4.3.0") registerS3method("+", "gg", add_gg)
 )
 
 on_load(S7::methods_register())

Original file line number	Diff line number	Diff line change
`@@ -31,8 +31,10 @@ on_load(`
`31`	`31`	`}`
`32`	`32`	`)`
`33`	`33`
	`34`	`+# In R >= 4.3.0, S7 methods fall back to base Ops behavior when one of the`
	`35`	`+# arguments is not an S7 object. This ensures compatibility in such cases.`
`34`	`36`	`on_load(`
`35`		`- if (getRversion() > "4.3.0") registerS3method("+", "gg", add_gg)`
	`37`	`+ if (getRversion() >= "4.3.0") registerS3method("+", "gg", add_gg)`
`36`	`38`	`)`
`37`	`39`
`38`	`40`	`on_load(S7::methods_register())`