From henrik.bengtsson at gmail.com  Mon Jan  2 20:29:22 2017
From: henrik.bengtsson at gmail.com (Henrik Bengtsson)
Date: Mon, 2 Jan 2017 11:29:22 -0800
Subject: [Rd] utils::ls.str(): Partial argument name 'digits' to seq()
	(should be digits.d?)
Message-ID: <CAFDcVCSrm0TV2w5v4wb+rcyRH7QEdCbHVB-7KKuk9CVM0BK6gw@mail.gmail.com>

Should utils::ls.str() be updated as:

svn diff src/library/utils/R/str.R
Index: src/library/utils/R/str.R
===================================================================
--- src/library/utils/R/str.R (revision 71879)
+++ src/library/utils/R/str.R (working copy)
@@ -622,7 +622,7 @@
         args$digits.d <- NULL
     }
     strargs <- c(list(max.level = max.level, give.attr = give.attr,
-                      digits = digits), args)
+                      digits.d = digits), args)
     for(nam in x) {
  cat(nam, ": ")
  ## check missingness, e.g. inside debug(.) :

Example:

$ R --quiet --vanilla
> options(warnPartialMatchArgs = TRUE, warn = 2)
> x <- 1
> ls.str()
x : Error in str.default(o, ...) :
  (converted from warning) partial argument match of 'digits' to 'digits.d'
> traceback()
10: doWithOneRestart(return(expr), restart)
9: withOneRestart(expr, restarts[[1L]])
8: withRestarts({
       .Internal(.signalCondition(simpleWarning(msg, call), msg,
           call))
       .Internal(.dfltWarn(msg, call))
   }, muffleWarning = function() NULL)
7: .signalSimpleWarning("partial argument match of 'digits' to 'digits.d'",
       quote(str.default(o, ...)))
6: str.default(o, ...)
5: str(o, ...)
4: (function (...)
   str(o, ...))(max.level = 1, give.attr = FALSE, digits = 3)
3: do.call(strO, strargs, quote = is.call(o) || is.symbol(o))
2: print.ls_str(x)
1: function (x, ...)
   UseMethod("print")(x)

/Henrik



[Rd] utils::ls.str(): Partial argument name 'digits' to seq() (should be digits.d?)
Henrik Bengtsson