apache
diff --git a/‎r/adbcdrivermanager/R/error.R‎
Lines changed: 1 addition & 0 deletions b/‎r/adbcdrivermanager/R/error.R‎
Lines changed: 1 addition & 0 deletions
@@ -27,6 +27,7 @@ stop_for_error <- function(status, error) {
       error <- list()
     }
 
+    error$status <- status
     error$status_code_message <- .Call(RAdbcStatusCodeMessage, status)
     msg <- adbc_error_message(status, error)
Original file line number	Diff line number	Diff line change
`@@ -27,6 +27,7 @@ stop_for_error <- function(status, error) {`
`27`	`27`	`error <- list()`
`28`	`28`	`}`
`29`	`29`
	`30`	`+ error$status <- status`
`30`	`31`	`error$status_code_message <- .Call(RAdbcStatusCodeMessage, status)`
`31`	`32`	`msg <- adbc_error_message(status, error)`
`32`	`33`