Update makeLinks.R

smasongarrison · smasongarrison · commit dd372f6e292a · 2026-04-11T18:23:01.000-04:00
diff --git a/R/makeLinks.R b/R/makeLinks.R
@@ -339,6 +339,8 @@ process_one <- function(matrix, rel_name, ids, nc, rel_pairs_file, writetodisk,
           file = rel_pairs_file,
           row.names = FALSE, col.names = FALSE, append = TRUE, sep = ","
         )
+      } else {
+        if (verbose) cat("No related pairs to write.\n")
       }
     }
     if (gc == TRUE) {

Original file line number	Diff line number	Diff line change
`@@ -339,6 +339,8 @@ process_one <- function(matrix, rel_name, ids, nc, rel_pairs_file, writetodisk,`
`339`	`339`	`file = rel_pairs_file,`
`340`	`340`	`row.names = FALSE, col.names = FALSE, append = TRUE, sep = ","`
`341`	`341`	`)`
	`342`	`+ } else {`
	`343`	`+ if (verbose) cat("No related pairs to write.\n")`
`342`	`344`	`}`
`343`	`345`	`}`
`344`	`346`	`if (gc == TRUE) {`