Merge pull request #105 from jweile/dev

mavevis: disable Pfam
rothlab · Dec 8, 2022 · 5fb42bb · 5fb42bb
2 parents d708e20 + 7515033
commit 5fb42bb
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/inst/scripts/mavevisLocal.R b/inst/scripts/mavevisLocal.R
@@ -154,12 +154,12 @@ for (infile in infiles) {
     cons <- calc.conservation(uniprot)
     td$add.constrack(cons)
 
-    cat("Querying PFam")
-    domains <- fetch.domains.pfam(uniprot)
-    if (!is.null(domains) && nrow(domains) > 0) {
-      colkey <- c(`Pfam-A`="goldenrod")
-      td$add.domtrack(domains,colkey)
-    }
+    # cat("Querying PFam")
+    # domains <- fetch.domains.pfam(uniprot)
+    # if (!is.null(domains) && nrow(domains) > 0) {
+    #   colkey <- c(`Pfam-A`="goldenrod")
+    #   td$add.domtrack(domains,colkey)
+    # }
 
     cat("Querying Uniprot")
     domains <- fetch.domains.uniprot(uniprot)