From 9cee837fbdda195b08939cf64c75b643c7d949c8 Mon Sep 17 00:00:00 2001
From: Phill <phill@starkingdom.co.uk>
Date: Tue, 2 Feb 2016 19:43:23 +0000
Subject: [PATCH] Update code comment about saving to Rds file

---
 R/b2AuthorizeAccount.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/b2AuthorizeAccount.R b/R/b2AuthorizeAccount.R
index d9c319c..dc92507 100644
--- a/R/b2AuthorizeAccount.R
+++ b/R/b2AuthorizeAccount.R
@@ -70,7 +70,7 @@ b2AuthorizeAccount <- function(url, accountId, authorizationKey) {
     )
 
   } else {
-    # Output as dataframe. Global variable, ooooohh
+    # Output as dataframe. Save as Rds file.
     accountAuthorization <-
       as.data.frame(jsonlite::fromJSON(httr::content(b2Return, type = "text")))
     saveRDS(accountAuthorization, "accountAuthorization.rds")