From 5a0def0787bf29fa31b098e84fac2b5096cae50f Mon Sep 17 00:00:00 2001
From: Jitao David Zhang <davidvonpku@gmail.com>
Date: Wed, 18 Feb 2026 10:29:51 +0100
Subject: [PATCH 1/2] add Balazs as co-author

---
 man/ribiosArg-package.Rd | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/man/ribiosArg-package.Rd b/man/ribiosArg-package.Rd
index 238c014..2dfddd4 100644
--- a/man/ribiosArg-package.Rd
+++ b/man/ribiosArg-package.Rd
@@ -18,5 +18,10 @@ Useful links:
 \author{
 \strong{Maintainer}: Jitao David Zhang \email{jitao_david.zhang@roche.com} (\href{https://orcid.org/0000-0002-3085-0909}{ORCID}) [contributor]
 
+Other contributors:
+\itemize{
+  \item Balazs Banfai [contributor]
+}
+
 }
 \keyword{internal}

From 6cb77e409124a81871e5619f544a8d2317fa87e0 Mon Sep 17 00:00:00 2001
From: Jitao David Zhang <davidvonpku@gmail.com>
Date: Wed, 18 Feb 2026 10:30:24 +0100
Subject: [PATCH 2/2] scriptSkeleton does not write to standard output by
 default - only so when explicitly requested, therefore adhering to the rule
 of CRAN

---
 R/scriptSkeleton.R    | 8 +++++---
 man/scriptSkeleton.Rd | 4 ++--
 2 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/R/scriptSkeleton.R b/R/scriptSkeleton.R
index 3222762..d57e6f5 100644
--- a/R/scriptSkeleton.R
+++ b/R/scriptSkeleton.R
@@ -1,6 +1,6 @@
 #' Generate a Rscript with its skeleton
 #'
-#' @param file Output file. By default the function writes to standard output.
+#' @param file Output file. Use `file=stdout()` to write the output to standard output.
 #'
 #' @return Invisibly returns the character vector of skeleton lines.
 #'   Called for its side effect of writing to \code{file}.
@@ -8,7 +8,7 @@
 #' @examples
 #' scriptSkeleton(file = file.path(tempdir(), "myscript.R"))
 
-scriptSkeleton <- function(file=stdout()) {
+scriptSkeleton <- function(file) {
     sentences <- c("#!/usr/bin/env Rscript",
                    "",
                    "# Initialize the script",
@@ -34,6 +34,8 @@ scriptSkeleton <- function(file=stdout()) {
                    "doLog(\"%s quits\", scriptName())",
                    "qqmsg(status=0L)",
                    sep="\n")
-    writeLines(text=sentences, con=file, sep="\n")
+    if(!missing(file)) {
+        writeLines(text=sentences, con=file, sep="\n")
+    }
     return(invisible(sentences))
 }
diff --git a/man/scriptSkeleton.Rd b/man/scriptSkeleton.Rd
index 382457b..b4fd735 100644
--- a/man/scriptSkeleton.Rd
+++ b/man/scriptSkeleton.Rd
@@ -4,10 +4,10 @@
 \alias{scriptSkeleton}
 \title{Generate a Rscript with its skeleton}
 \usage{
-scriptSkeleton(file = stdout())
+scriptSkeleton(file)
 }
 \arguments{
-\item{file}{Output file. By default the function writes to standard output.}
+\item{file}{Output file. Use `file=stdout()` to write the output to standard output.}
 }
 \value{
 Invisibly returns the character vector of skeleton lines.