... | ... |
@@ -1387,7 +1387,8 @@ appendGDSSampleOnly <- function(gds, listSamples) { |
1387 | 1387 |
#' listBlock=listBlock, |
1388 | 1388 |
#' blockName="blockEmpty", |
1389 | 1389 |
#' blockDesc="Example") |
1390 |
-#'. closefn.gds(gdsAnnot1KG) |
|
1390 |
+#' |
|
1391 |
+#' closefn.gds(gdsAnnot1KG) |
|
1391 | 1392 |
#' |
1392 | 1393 |
#' gdsAnnot1KG <- openfn.gds(fileAnnotGDS) |
1393 | 1394 |
#' print(gdsAnnot1KG) |
... | ... |
@@ -58,7 +58,8 @@ fileReferenceGDS <- file.path(dataDir, "tests", |
58 | 58 |
listBlock=listBlock, |
59 | 59 |
blockName="blockEmpty", |
60 | 60 |
blockDesc="Example") |
61 |
-. closefn.gds(gdsAnnot1KG) |
|
61 |
+ |
|
62 |
+ closefn.gds(gdsAnnot1KG) |
|
62 | 63 |
|
63 | 64 |
gdsAnnot1KG <- openfn.gds(fileAnnotGDS) |
64 | 65 |
print(gdsAnnot1KG) |