Browse code

genomeName,BiocFile() replaces other *File methods

Michael Lawrence authored on 04/01/2021 21:58:36
Showing1 changed files

... ...
@@ -50,8 +50,8 @@ setGeneric("genomeName", function(x) standardGeneric("genomeName"))
50 50
 
51 51
 setMethod("genomeName", "character", function(x) x)
52 52
 setMethod("genomeName", "BSgenome", function(x) providerVersion(x))
53
-setMethods("genomeName", list("RTLFile", "RsamtoolsFile"),
54
-           function(x) file_path_sans_ext(basename(path(x)), TRUE))
53
+setMethod("genomeName", "BiocFile",
54
+          function(x) file_path_sans_ext(basename(path(x)), TRUE))
55 55
 setMethod("genomeName", "ANY", function(x) {
56 56
     if (hasMethod("seqinfo", class(x))) {
57 57
         ans <- unique(genome(x))