delete -> remove for storage accts

R/stored_acct.R

@@ -24,7 +24,7 @@
 #' show_sas(sas_name)
 #'
 #' update_attributes(attributes=vault_object_attrs(), ...)
-#' delete(confirm=TRUE)
+#' remove(confirm=TRUE)
 #' ```
 #' @section Arguments:
 #' - `key_name`: For `regenerate_key`, the name of the access key to regenerate.
@@ -94,6 +94,15 @@ public=list(
     autoRegenerateKey=NULL,
     regenerationPeriod=NULL,
 
+    # change delete -> remove for storage accts
+    delete=NULL,
+
+    remove=function(confirm=TRUE)
+    {
+        if(delete_confirmed(confirm, self$name, "storage"))
+            invisible(self$do_operation(version=NULL, http_verb="DELETE"))
+    },
+
     regenerate_key=function(key_name)
     {
         self$do_operation("regeneratekey", body=list(keyName=key_name), http_verb="POST")

man/storage_account.Rd

@@ -42,7 +42,7 @@ list_sas_definitions()
 show_sas(sas_name)
 
 update_attributes(attributes=vault_object_attrs(), ...)
-delete(confirm=TRUE)
+remove(confirm=TRUE)
 }