Fix typo bug in internal stopf() and warnf() around 'call.' argument

Author: HenrikBengtsson

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: future.batchtools
-Version: 0.21.0-9004
+Version: 0.21.0-9005
 Depends:
     R (>= 3.2.0),
     future (>= 1.58.0)

R/utils,conditions.R

@@ -3,7 +3,7 @@ stopf <- function(fmt, ..., call. = TRUE, domain = NULL) {  #nolint
   msg <- .makeMessage(msg, domain = domain)
   if (is.call(call.)) {
     call <- call.
-  } else if (isTRUE(call)) {
+  } else if (isTRUE(call.)) {
     call <- sys.call(which = -1L)
   } else {
     call <- NULL
@@ -21,7 +21,7 @@ warnf <- function(fmt, ..., call. = TRUE, immediate. = FALSE, domain = NULL) {
     msg <- .makeMessage(msg, domain = domain)
     if (is.call(call.)) {
       call <- call.
-    } else if (isTRUE(call)) {
+    } else if (isTRUE(call.)) {
       call <- sys.call(which = -1L)
     } else {
       call <- NULL