From 1e715b164cf412d7a7674df0681b81841e95279e Mon Sep 17 00:00:00 2001 From: aoles Date: Tue, 19 Mar 2024 21:12:58 +0100 Subject: [PATCH] Address problems with the previous fix --- DESCRIPTION | 2 +- R/metadataAccessors.R | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index ca441fe..ec50f27 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,5 +1,5 @@ Package: RBioFormats -Version: 1.3.1 +Version: 1.3.2 BioFormats: 6.12.0 Title: R interface to Bio-Formats Description: An R package which interfaces the OME Bio-Formats Java library to diff --git a/R/metadataAccessors.R b/R/metadataAccessors.R index 4524116..1afaf4a 100644 --- a/R/metadataAccessors.R +++ b/R/metadataAccessors.R @@ -32,8 +32,8 @@ seriesMetadata = function (x, series, ...) .getMetadata(x, series, ...) .getMetadata = function (x, series, ...) { ## metadata type equals accessor name - sys_call <- sys.call(-1L)[[1L]] - type = as.character(sys_call[[length(sys_call)]])# account for calls via `::` + sys_call <- as.character(sys.call(-1L)[[1L]]) + type = sys_call[[length(sys_call)]]# account for calls via `::` and `:::` metadata = metadata(x)