Skip to content

Commit

Permalink
Spelling (PR#16371).
Browse files Browse the repository at this point in the history
git-svn-id: https://svn.r-project.org/R/trunk@80643 00db46b3-68df-0310-9c12-caf00c1e9a41
  • Loading branch information
hornik committed Jul 20, 2021
1 parent 7cc9326 commit 554b98d
Show file tree
Hide file tree
Showing 4 changed files with 7 additions and 7 deletions.
2 changes: 1 addition & 1 deletion doc/NEWS.2
Original file line number Diff line number Diff line change
Expand Up @@ -13550,7 +13550,7 @@ BUG FIXES
o reg-test-1.R tested system(intern=TRUE) which depends on popen
and so is not supported on all platforms.

o Changed apparent mis-spelling of "Gibraltar" in dataset 'eurodist'.
o Changed apparent misspelling of "Gibraltar" in dataset 'eurodist'.

o sysconf() is now used to find the number of clock ticks/second:
under some circumstances glibc reported CLK_TCK = 60 when the
Expand Down
6 changes: 3 additions & 3 deletions src/library/tools/R/QC.R
Original file line number Diff line number Diff line change
Expand Up @@ -8046,7 +8046,7 @@ function(dir, localOnly = FALSE, pkgSize = NA)
if(!inherits(year <- tryCatch(format(as.Date(meta0["Published"]), "%Y"),
error = identity),
"error")){
## possible mis-spellings and keep only the new ones:
## possible misspellings and keep only the new ones:
if(NROW(a <- out$spelling)
&& config_val_to_logical(Sys.getenv("_R_CHECK_CRAN_INCOMING_ASPELL_RECHECK_MAYBE_",
"TRUE"))
Expand Down Expand Up @@ -8176,7 +8176,7 @@ function(x, ...)
})),
if(NROW(y <- x$spelling)) {
s <- split(sprintf("%d:%d", y$Line, y$Column), y$Original)
paste(c("Possibly mis-spelled words in DESCRIPTION:",
paste(c("Possibly misspelled words in DESCRIPTION:",
sprintf(" %s (%s)",
names(s),
lapply(s, paste, collapse = ", "))),
Expand All @@ -8186,7 +8186,7 @@ function(x, ...)
"FOSS licence with BuildVignettes: false"
},
if(length(y <- x$fields)) {
paste(c("Unknown, possibly mis-spelled, fields in DESCRIPTION:",
paste(c("Unknown, possibly misspelled, fields in DESCRIPTION:",
sprintf(" %s", paste(sQuote(y), collapse = " "))),
collapse = "\n")
},
Expand Down
2 changes: 1 addition & 1 deletion src/library/utils/R/aspell.R
Original file line number Diff line number Diff line change
Expand Up @@ -286,7 +286,7 @@ function(object, ...)
{
words <- sort(unique(object$Original))
if(length(words)) {
writeLines("Possibly mis-spelled words:")
writeLines("Possibly misspelled words:")
print(words)
}
invisible(words)
Expand Down
4 changes: 2 additions & 2 deletions src/library/utils/man/aspell.Rd
Original file line number Diff line number Diff line change
Expand Up @@ -76,7 +76,7 @@ aspell(files, filter, control = list(), encoding = "unknown",

The print method for the objects returned by \code{aspell} has an
\code{indent} argument controlling the indentation of the positions of
possibly mis-spelled words. The default is 2; Emacs users may find it
possibly misspelled words. The default is 2; Emacs users may find it
useful to use an indentation of 0 and visit output in grep-mode. It
also has a \code{verbose} argument: when this is true, suggestions for
replacements are shown as well.
Expand All @@ -91,7 +91,7 @@ aspell(files, filter, control = list(), encoding = "unknown",
}
\value{
A data frame inheriting from \code{aspell} (which has a useful print
method) with the information about possibly mis-spelled words.
method) with the information about possibly misspelled words.
}
\references{
Kurt Hornik and Duncan Murdoch (2011).
Expand Down

0 comments on commit 554b98d

Please sign in to comment.