tclpkg graphcmd: remove some uses of bare 'sprintf'

Gitlab: #1950

diff --git a/tclpkg/tcldot/tcldot-graphcmd.c b/tclpkg/tcldot/tcldot-graphcmd.c
index f858b3e66a5d9d27c2394f5eddb47fa507a0f8fc..85b463c27b9222b98e1673753557b5c69bd21f67 100644 (file)
--- a/tclpkg/tcldot/tcldot-graphcmd.c
+++ b/tclpkg/tcldot/tcldot-graphcmd.c
@@ -108,12 +108,12 @@ int graphcmd(ClientData clientData, Tcl_Interp * interp,
        return TCL_OK;
 
     } else if (strcmp("countnodes", argv[1]) == 0) {
-       sprintf(buf, "%d", agnnodes(g));
+       snprintf(buf, sizeof(buf), "%d", agnnodes(g));
        Tcl_AppendResult(interp, buf, NULL);
        return TCL_OK;
 
     } else if (strcmp("countedges", argv[1]) == 0) {
-       sprintf(buf, "%d", agnedges(g));
+       snprintf(buf, sizeof(buf), "%d", agnedges(g));
        Tcl_AppendResult(interp, buf, NULL);
        return TCL_OK;