diff --git a/R/hurricane.R b/R/hurricane.R
index 469cd56..29bc93c 100644
--- a/R/hurricane.R
+++ b/R/hurricane.R
@@ -29,7 +29,6 @@ hurricane <- function(params_loc) {
     # is not complete. What do we do then? Fill in any missing fields
     # with the corresponding values from default params?
     if (isTRUE(default)) {
-        message("hit the if block")
         peaks_path <- system.file(
             "extdata", "peaks.RDS", package="ImperialNMRTool")
         spec_path <- system.file(
diff --git a/R/sub2indR.R b/R/sub2indR.R
index 7ba7b19..46d8139 100644
--- a/R/sub2indR.R
+++ b/R/sub2indR.R
@@ -3,7 +3,7 @@
 #' Convert row, column subscripts to linear indices.
 #' Comparable to sub2ind in MATLAB.
 #'
-#' MTJ mjudge\at\imperial.ac.uk
+#' MTJ mjudge-at-imperial.ac.uk
 #' 9MARCH2022
 #' @param rows rows object
 #' @param cols columns object