diff --git a/R/piping-ini.R b/R/piping-ini.R
index f636d3add..ffa89fe51 100644
--- a/R/piping-ini.R
+++ b/R/piping-ini.R
@@ -331,7 +331,8 @@
   if (length(.w) != 1) {
     stop("cannot find parameter '", lhs, "'", call.=FALSE)
   } else if (!is.character(newLabel) || !(length(newLabel) == 1)) {
-    stop("the new label for '", lhs, "' must be a character string")
+    stop("the new label for '", lhs, "' must be a character string",
+         call.=FALSE)
   }
   ini$label[.w] <- newLabel
   assign("iniDf", ini, envir=rxui)