diff --git a/R/GOreport.R b/R/GOreport.R
index aa3d2a5..e7f6c8d 100644
--- a/R/GOreport.R
+++ b/R/GOreport.R
@@ -24,6 +24,8 @@ GOreport <- function(goHypGresult, chip, highlightedGenes=NULL) {
   reportGenes <- sapply(reportGenes, function(x) {
                                        paste(x, collapse=",")
                                      })
+  ## XXX: please fix this temporary workaround
+  summary <- getGeneric("summary")
   report <- data.frame(summary(goHypGresult), GeneSyms=reportGeneSyms, Genes=reportGenes)
   rownames(report) <- NULL
   report[sort(report$"OddsRatio", decreasing=TRUE, index.return=TRUE)$ix, ]