Minor improvements to examples and docs

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: projects
 Title: A Project Infrastructure for Researchers
-Version: 2.0.99.9004
+Version: 2.0.99.9005
 Authors@R: 
     c(person(given = "Nik",
              family = "Krieger",

R/class-projects_author.R

@@ -33,8 +33,6 @@
 #'
 #' @param x For \code{projects_author()}, an integer or character vector. For
 #'
-#'   For the \code{as.*()} methods, a \code{projects_author} object.
-#'
 #'   For \code{\link{match}()} and \code{\link{\%in\%}}, an integer, a character
 #'   string, or a \code{projects_author} object. See \code{\link{match}()} and
 #'   \strong{Equality and value matching methods} below.
@@ -51,8 +49,6 @@
 #'   \code{projects_author} object. See \code{\link{match}()}.
 #'
 #' @seealso \code{\link{Ops}}; \code{\link[methods]{Methods_for_Nongenerics}}.
-#'   For other S3 class-retention strategies, see \code{\link{Extract}} and
-#'   \code{\link{[.data.frame}}.
 #'
 #' @examples
 #' #############################################################################
@@ -64,7 +60,7 @@
 #' Sys.unsetenv("PROJECTS_FOLDER_PATH")
 #' Sys.setenv(HOME = temp_dir)
 #' setup_projects(path = temp_dir)
-#' new_author("jonesman", "chuck", id = 33)
+#' new_author("chuck", "jonesman", id = 33)
 #' new_author("Hattie", "Hatsman", id = 45)
 #' #############################################################################
 #'
@@ -86,10 +82,6 @@
 #' # numbers are compared.
 #' jones == c("jOnES", "hat")   # TRUE FALSE
 #'
-#' x <- structure("32: Clinton", class = "dummyclass")
-#' class(c(x))     # Does not retain class
-#' class(c(jones)) # Retains class
-#'
 #' #############################################################################
 #' # Cleanup (or just restart R)
 #' Sys.setenv(HOME = old_home, PROJECTS_FOLDER_PATH = old_ppath)

R/class-projects_stage.R

@@ -33,8 +33,6 @@
 #'
 #' @param x For \code{projects_stage()}, an integer or character vector. For
 #'
-#'   For the \code{as.*()} methods, a \code{projects_stage} object.
-#'
 #'   For \code{\link{match}()} and \code{\link{\%in\%}}, an integer, a character
 #'   string, or a \code{projects_stage} object. See \code{\link{match}()} and
 #'   \strong{Comparison and value matching methods} below.
@@ -54,8 +52,6 @@
 #'   \code{projects_stage}.
 #'
 #' @seealso \code{\link{Ops}}; \code{\link[methods]{Methods_for_Nongenerics}}.
-#'   For other S3 class-retention strategies, see \code{\link{Extract}} and
-#'   \code{\link{[.data.frame}}.
 #'
 #' @examples
 #' stage <- projects_stage("4: manuscript")
@@ -74,10 +70,6 @@
 #' more_stages <- projects_stage(c("0: idea", "4: manuscript", "1: design"))
 #'
 #' match("MAnuscRIPT", more_stages)      # 2
-#'
-#' x <- structure("7: redacted", class = "dummyclass")
-#' class(c(x))     # Does not retain class
-#' class(c(stage, more_stages)) # Retains class
 #' @rdname projects_stage
 #' @export
 methods::setClass("projects_stage")

R/edit.R

@@ -327,8 +327,6 @@ edit_affiliation <- function(affiliation,
   institution_name <- validate_single_string(institution_name, null.ok = TRUE)
   address          <- validate_single_string(address, null.ok = TRUE)
 
-  message("Edited affiliation:")
-
   edited_row <-
     edit_metadata(
       table = affiliations_table,