From 7c817540f4973aa365e6159b36f3b6618dc42c54 Mon Sep 17 00:00:00 2001
From: js2264 <jacquesserizay@gmail.com>
Date: Wed, 10 Jan 2024 13:59:50 +0100
Subject: [PATCH] fix: "file: " in matrix plot caption when comparing 2
 matrices

---
 R/plotting.R | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/R/plotting.R b/R/plotting.R
index a47913d..e576d94 100644
--- a/R/plotting.R
+++ b/R/plotting.R
@@ -143,10 +143,15 @@ setMethod("plotMatrix", "HiCExperiment", function(
         )
     }
     if (caption & is.null(tracks)) {
+        f <- fileName(x)
+        if (!is.null(compare.to)) {
+            f <- paste0(fileName(x), ' | ', fileName(compare.to))
+            print(f)
+        }
         p <- p + ggplot2::labs(
             caption = paste(
                 sep = '\n',
-                paste0('file: ', fileName(x)), 
+                paste0('file: ', f), 
                 paste0('resolution: ', resolution(x)), 
                 paste0('focus: ', focus(x)),
                 paste0('scores: ', use.scores),