also check missing(e2) in fallback.

RConsortium · Nov 6, 2024 · 0ad14b6 · 0ad14b6
1 parent 7a995ea
commit 0ad14b6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/method-ops.R b/R/method-ops.R
@@ -26,7 +26,7 @@ Ops.S7_object <- function(e1, e2) {
     S7_error_method_not_found = function(cnd) cnd
   )
 
-  if (S7_inherits(e1) && S7_inherits(e2)) {
+  if (S7_inherits(e1) && (missing(e2) || S7_inherits(e2))) {
     stop(cnd)
   } else {
     # Must call NextMethod() directly in the method, not wrapped in an