add debug option with option freesurferformats.debug

dfsp-spirit · Jan 26, 2022 · e3b39e3 · e3b39e3
1 parent 9368534
commit e3b39e3
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/read_fs_annot.R b/R/read_fs_annot.R
@@ -27,6 +27,10 @@
 #' @export
 read.fs.annot <- function(filepath, empty_label_name="empty", metadata=list(), default_label_name="") {
 
+    if(getOption("freesurferformats.debug", default=0) >= 2) {
+      cat(sprintf("Handling annot file '%s'.\n", filepath));
+    }
+
     if(! file.exists(filepath)) {
       stop(sprintf("Annotation file '%s' does not exist or cannot be read.\n", filepath));
     }