Skip to content
This repository has been archived by the owner on Oct 31, 2019. It is now read-only.

Commit

Permalink
Merge pull request #52 from Microsoft/dev
Browse files Browse the repository at this point in the history
Merge changes to storage API into master
  • Loading branch information
andrie committed Mar 8, 2017
2 parents 5d00fc6 + 83a0507 commit 9300352
Show file tree
Hide file tree
Showing 23 changed files with 525 additions and 533 deletions.
5 changes: 5 additions & 0 deletions .gitignore
Original file line number Diff line number Diff line change
@@ -1,3 +1,8 @@
.Rproj.user
.Rhistory
.RData
*.Rproj
*.rxproj
*.rxproj.user
*.suo

3 changes: 2 additions & 1 deletion R/AzureAuthenticate.R
Original file line number Diff line number Diff line change
Expand Up @@ -70,12 +70,13 @@ azureAuthenticate <- function(azureActiveContext, tenantID, clientID, authKey, v
#' @family Resources
#' @export
azureCheckToken <- function(azureActiveContext) {
if (missing(azureActiveContext) || is.null(azureActiveContext)) return(NA)
if (is.null(azureActiveContext$EXPIRY))
stop("Not Authenticated: Use azureAuthenticate")

if (azureActiveContext$EXPIRY < Sys.time()) {
message("Azure Token Expired: Attempting automatic renewal")
azureAuthenticate(azureActiveContext)
}
return("OK")
return(TRUE)
}
Loading

0 comments on commit 9300352

Please sign in to comment.