From 1275ce1cc7640347cec3b0e41bef3962341b2739 Mon Sep 17 00:00:00 2001
From: Joshua Lambert <joshua.lambert@lshtm.ac.uk>
Date: Tue, 9 Jul 2024 15:20:58 +0100
Subject: [PATCH] Remove unnecessary sprintf() from format.epidist()

Co-authored-by: Hugo Gruson <10783929+Bisaloo@users.noreply.github.com>
---
 R/epidist.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/epidist.R b/R/epidist.R
index c2cf517dd..4c90520b0 100644
--- a/R/epidist.R
+++ b/R/epidist.R
@@ -438,7 +438,7 @@ format.epidist <- function(x, header = TRUE, vb = NULL, ...) {
     )
     writeLines(sprintf(dist_string, family(x)))
   } else {
-    writeLines(sprintf("Parameters: <no parameters>"))
+    writeLines("Parameters: <no parameters>")
   }
 
   if (is.object(x$prob_dist)) {