use select parm instead of x in is.numeric

Mukulyadav2004 · web-flow · commit 08f6fee012ce · 2025-08-23T03:02:14.000+05:30
diff --git a/R/fwrite.R b/R/fwrite.R
@@ -43,7 +43,7 @@ fwrite = function(x, file="", append=FALSE, quote="auto",
   }
   # Handle select argument using .shallow()
   if (!is.null(select)) {
-    cols = if (is.numeric(x)) {  # numeric/integer avoids O(#cols) name-match overhead
+    cols = if (is.numeric(select)) {  # numeric/integer avoids O(#cols) name-match overhead
         as.integer(select)
     } else {
         colnamesInt(x, select)

Original file line number	Diff line number	Diff line change
`@@ -43,7 +43,7 @@ fwrite = function(x, file="", append=FALSE, quote="auto",`
`43`	`43`	`}`
`44`	`44`	`# Handle select argument using .shallow()`
`45`	`45`	`if (!is.null(select)) {`
`46`		`- cols = if (is.numeric(x)) { # numeric/integer avoids O(#cols) name-match overhead`
	`46`	`+ cols = if (is.numeric(select)) { # numeric/integer avoids O(#cols) name-match overhead`
`47`	`47`	`as.integer(select)`
`48`	`48`	`} else {`
`49`	`49`	`colnamesInt(x, select)`