fix option handling

MichaelChirico · MichaelChirico · commit d8ba683a159d · 2025-07-01T19:01:31.000Z
diff --git a/R/data.table.R b/R/data.table.R
@@ -545,7 +545,7 @@ replace_dot_alias = function(e) {
           if (allLen1) {
             irows = f__
           } else {
-            join.many = getOption("datatable.join.many") # #914, default TRUE for backward compatibility
+            join.many = isTRUE(getOption("datatable.join.many", TRUE)) # #914, default TRUE for backward compatibility
             anyDups = !notjoin &&
               (
                 # #698. When notjoin=TRUE, ignore allow.cartesian. Rows in answer will never be > nrow(x).

Original file line number	Diff line number	Diff line change
`@@ -545,7 +545,7 @@ replace_dot_alias = function(e) {`
`545`	`545`	`if (allLen1) {`
`546`	`546`	`irows = f__`
`547`	`547`	`} else {`
`548`		`- join.many = getOption("datatable.join.many") # #914, default TRUE for backward compatibility`
	`548`	`+ join.many = isTRUE(getOption("datatable.join.many", TRUE)) # #914, default TRUE for backward compatibility`
`549`	`549`	`anyDups = !notjoin &&`
`550`	`550`	`(`
`551`	`551`	`# #698. When notjoin=TRUE, ignore allow.cartesian. Rows in answer will never be > nrow(x).`