Fix bug on key_set and env backend

gaborcsardi · gaborcsardi · commit f11040f9396d · 2018-07-13T19:35:17.000+01:00
Closes #51.
diff --git a/R/backend-env.R b/R/backend-env.R
@@ -82,7 +82,8 @@ b_env_get <- function(self, private, service, username, keyring) {
 b_env_set <- function(self, private, service, username, keyring) {
   warn_for_keyring(keyring)
   password <- get_pass()
-  b_env_set_with_value(self, private, service, username, password)
+  b_env_set_with_value(self, private, service, username, password,
+                       keyring = NULL)
   invisible(self)
 }
 

Original file line number	Diff line number	Diff line change
`@@ -82,7 +82,8 @@ b_env_get <- function(self, private, service, username, keyring) {`
`82`	`82`	`b_env_set <- function(self, private, service, username, keyring) {`
`83`	`83`	`warn_for_keyring(keyring)`
`84`	`84`	`password <- get_pass()`
`85`		`- b_env_set_with_value(self, private, service, username, password)`
	`85`	`+ b_env_set_with_value(self, private, service, username, password,`
	`86`	`+ keyring = NULL)`
`86`	`87`	`invisible(self)`
`87`	`88`	`}`
`88`	`89`