Remove package check and style tweak

.travis.yml

@@ -1,7 +1,6 @@
 language: r
 
 r_github_packages:
-  - s-u/PKI
   - jimhester/covr
   - jeroenooms/curl
 

R/hmac.r

@@ -7,9 +7,9 @@
 #' @keywords internal
 #' @export
 hmac_sha1 <- function(key, string) {
-  if(is.character(string))
+  if (is.character(string))
     string <- charToRaw(paste(string, collapse = "\n"))
-  if(is.character(key))
+  if (is.character(key))
     key <- charToRaw(paste(key, collapse = "\n"))
   hash <- openssl::sha1(string, key = key)
   openssl::base64_encode(hash)

R/oauth-server-side.R

@@ -27,9 +27,6 @@ init_oauth_service_account <- function(endpoint, secrets, scope = NULL) {
 #' jwt_signature(cred, "https://www.googleapis.com/auth/userinfo.profile")
 #' }
 jwt_signature <- function(credentials, scope, duration = 60 * 60) {
-  if (!requireNamespace("openssl", quietly = TRUE)) {
-    stop("Package 'openssl' required for JWT signing", call. = FALSE)
-  }
   now <- as.numeric(Sys.time())
   cs <- jwt_claimset(credentials$client_email, scope, iat = now,
     exp = now + duration)