From 7a5144f27e6d5a132a4dca1de2006e32e906c965 Mon Sep 17 00:00:00 2001
From: Michael Ortmann <keine email>
Date: Sun, 7 Jan 2024 22:30:19 +0100
Subject: [PATCH] Fix format

---
 src/tclhash.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/tclhash.c b/src/tclhash.c
index 1028471a6..230327780 100644
--- a/src/tclhash.c
+++ b/src/tclhash.c
@@ -738,7 +738,7 @@ static int trigger_bind(const char *proc, const char *param, char *mask)
 
   if(proc && proc[0] != '*') { /* proc[0] != '*' excludes internal binds */
 #ifdef DEBUG_CONTEXT
-    snprintf(last_bind_called, sizeof last_bind_called, proc);
+    strlcpy(last_bind_called, proc, sizeof last_bind_called);
 #endif
     debug1("triggering bind %s", proc);
     r = getrusage(RUSAGE_SELF, &ru1);