save a line+variable

MichaelChirico · web-flow · commit 72d50630d922 · 2025-06-24T14:20:46.000-07:00
diff --git a/R/data.table.R b/R/data.table.R
@@ -139,15 +139,14 @@ replace_dot_alias = function(e) {
       )
     }
     if (is.character(j)) {
-      idx = match(j, names(k))
-      if (is.na(idx)) {
+      j = match(j, names(k))
+      if (is.na(j)) {
         if (is.null(err_msg_na)) {
           internal_error("item '%s' not found in names of list", origj) # nocov
         } else {
           stopf(err_msg_na, origj)
         }
       }
-      j = idx
     }
     .Call(Csetlistelt, k, as.integer(j), value)
   } else if (is.environment(k) && exists(as.character(name[[3L]]), k, inherits = FALSE)) {

Original file line number	Diff line number	Diff line change
`@@ -139,15 +139,14 @@ replace_dot_alias = function(e) {`
`139`	`139`	`)`
`140`	`140`	`}`
`141`	`141`	`if (is.character(j)) {`
`142`		`- idx = match(j, names(k))`
`143`		`- if (is.na(idx)) {`
	`142`	`+ j = match(j, names(k))`
	`143`	`+ if (is.na(j)) {`
`144`	`144`	`if (is.null(err_msg_na)) {`
`145`	`145`	`internal_error("item '%s' not found in names of list", origj) # nocov`
`146`	`146`	`} else {`
`147`	`147`	`stopf(err_msg_na, origj)`
`148`	`148`	`}`
`149`	`149`	`}`
`150`		`- j = idx`
`151`	`150`	`}`
`152`	`151`	`.Call(Csetlistelt, k, as.integer(j), value)`
`153`	`152`	`} else if (is.environment(k) && exists(as.character(name[[3L]]), k, inherits = FALSE)) {`