Fix example (#20)

2021-04-13 00:38:07 +09:00 · 2021-04-13 00:38:07 +09:00 · 5bf9fb77b2
--- a/R/az_group.R
+++ b/R/az_group.R
@ -35,7 +35,7 @@
 #' usr <- gr$get_user("myname@aadtenant.com")
 #'
 #' grps <- usr$list_direct_memberships()
-#' grp <- grp[[1]]
+#' grp <- gr$get_group(grps[1])
 #'
 #' grp$list_members()
 #' grp$list_owners()
--- a/man/az_group.Rd
+++ b/man/az_group.Rd
@ -47,7 +47,7 @@ gr <- get_graph_login()
 usr <- gr$get_user("myname@aadtenant.com")

 grps <- usr$list_direct_memberships()
-grp <- grp[[1]]
+grp <- gr$get_group(grps[1])

 grp$list_members()
 grp$list_owners()