Fix minor package issues

DESCRIPTION

@@ -48,7 +48,7 @@ Imports:
 Suggests:
     testthat (>= 3.0.0),
     tibble,
-    utils
+    utils,
 VignetteBuilder: 
     knitr
 ByteCompile: true

R/auth.R

@@ -222,7 +222,7 @@ auth_from_secret <- function(app_name, token, access_token, refresh_token, cache
 # This sets up the app creds no matter which way authorization is called
 app_set_up <- function(app_name = "google") {
   decrypted <- openssl::aes_cbc_decrypt(
-    readRDS(encrypt_creds_path("google")),
+    readRDS(encrypt_creds_path()),
     key = readRDS(key_encrypt_creds_path())
   )
 

R/github_handling.R

@@ -34,8 +34,7 @@ get_github <- function(token = NULL, url) {
 #'
 #' Given an repository on GitHub, retrieve the pages URL for it.
 #'
-#' @param repo_name The full name of the repo to get bookdown chapters from.
-#' e.g. "jhudsl/OTTR_Template"
+#' @param repo_name The full name of the repo to get chapters from. e.g. 'jhudsl/OTTR_Template'
 #' @param token If private repositories are to be retrieved, a github personal
 #' access token needs to be supplied. Run `authorize("github")` to set this.
 #' @param verbose TRUE/FALSE do you want more progress messages?
@@ -202,7 +201,7 @@ get_repo_info <- function(repo_name,
 #'
 #' @export
 #'
-#' @examples \dontrun {
+#' @examples \dontrun{
 #'
 #' authorize("github")
 #' check_git_repo("jhudsl/OTTR_Template")