diff --git a/RBBGCMuso/R/multiSite.R b/RBBGCMuso/R/multiSite.R
index e868fcc..5be9ffc 100644
--- a/RBBGCMuso/R/multiSite.R
+++ b/RBBGCMuso/R/multiSite.R
@@ -176,6 +176,10 @@ multiSiteCalib <- function(measurements,
                                }
 
                       , error = function(e){
+                                            # browser()
+                                            sink("error.txt")
+                                            print(e)
+                                            sink()
                                             saveRDS(e,"error.RDS")
                                             writeLines(as.character(iterations),"progress.txt")
                                         })