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

Author: HenrikBengtsson

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: future.p2p
 Title: A Peer-to-Peer Compute Cluster via Futureverse
-Version: 0.4.0-9000
+Version: 0.4.0-9001
 Description: Implementation of the 'Future' API <doi:10.32614/RJ-2021-048> that resolves futures on a peer-to-peer ('P2P') compute environment. By using this future backend, you and your friends can share your spare compute resources with each other.
 Imports:
     future (>= 1.67.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