diff --git a/R/stana.R b/R/stana.R index f70e47d..e600ee5 100644 --- a/R/stana.R +++ b/R/stana.R @@ -101,7 +101,7 @@ setMethod("show", cat_subtle("# Loaded KO table: ", length(object@kos), " ID: ", paste0(names(object@kos)[1], collapse="/"), "\n", sep="") } if (length(object@fastaList)!=0) { - cat_subtle("# Inferred fasta: ", length(object@kos), " ID: ", paste0(names(object@kos)[1], collapse="/"), "\n", sep="") + cat_subtle("# Inferred fasta: ", length(object@fastaList), " ID: ", paste0(names(object@fastaList)[1], collapse="/"), "\n", sep="") } cat_subtle("# Size: ", object.size(object), " B\n", sep="") })