From 5b00a1bc6eebe371148b00ea7fca1c909f244b7b Mon Sep 17 00:00:00 2001 From: Gregory Jefferis Date: Mon, 23 Sep 2024 06:28:53 +0100 Subject: [PATCH] fix duplicate listing when finding flytable base * Erika reported a case * Hard to get to the bottom of, but ultimately down to the same base appearing twice in the results of flytable_workspaces() --- R/flytable.R | 1 + 1 file changed, 1 insertion(+) diff --git a/R/flytable.R b/R/flytable.R index d9ef11b6..5a929b1a 100644 --- a/R/flytable.R +++ b/R/flytable.R @@ -102,6 +102,7 @@ flytable_base_impl <- memoise::memoise(function(base_name=NULL, table=NULL, url, if(is.null(workspace_id)) { wsdf=flytable_workspaces(ac=NULL) wsdf.sel=subset(wsdf, wsdf$name == base_name) + wsdf.sel=subset(wsdf.sel, !duplicated(wsdf.sel$workspace_id)) if(nrow(wsdf.sel)==0) stop("Unable to find a workspace containing basename:", base_name, "\nCheck basename and/or access permissions.")