-- 
cgit v0.12

From 12f99478e867223de84c7de4cd2e49998bbb07e7 Mon Sep 17 00:00:00 2001
From: dgp <dgp@users.sourceforge.net>
Date: Thu, 25 Jul 2024 18:49:38 +0000
Subject: typo in documentation escape sequence

---
 doc/clock.n | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/doc/clock.n b/doc/clock.n
index 77b6903..065938e 100644
--- a/doc/clock.n
+++ b/doc/clock.n
@@ -202,7 +202,7 @@ If \fIboolean\fR is true (default), \fBclock scan\fR will raise an error
 if the input contains invalid values, e.g. day of month greater than
 number of days in the month. If specified as false, the command makes
 an adjustment to bring values within acceptable range. See
-\fBSCANNING TIMES\fT for details.
+\fBSCANNING TIMES\fR for details.
 .PP
 If none of these is present, the C \fBlocaltime\fR and \fBmktime\fR
 functions are used to attempt to convert times between local and
-- 
cgit v0.12


From b882ae374d3347c200686c12d27efeaeac4ad298 Mon Sep 17 00:00:00 2001
From: dgp <dgp@users.sourceforge.net>
Date: Tue, 30 Jul 2024 15:29:12 +0000
Subject: test hygiene

---
 tests/zipfs.test | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/tests/zipfs.test b/tests/zipfs.test
index 3375af2..3d583c7 100644
--- a/tests/zipfs.test
+++ b/tests/zipfs.test
@@ -1945,11 +1945,12 @@ namespace eval test_ns_zipfs {
         set basename bug-7d5f1c1308
         set mt //zipfs:/$basename-mt
         set zipfile $basename.zip
-        set dir [tcltest::makeDirectory $basename]
+        set dir [makeDirectory $basename]
         close [open [file join $dir .ext] w]
     } -cleanup {
         zipfs unmount $mt
         file delete $zipfile
+	removeDirectory $basename
     } -body {
         zipfs mkzip $zipfile $dir [file dirname $dir]
         zipfs mount $zipfile $mt
-- 
cgit v0.12


From 2bbab324301a3857c8ac708c5bd9f90fe5d3d456 Mon Sep 17 00:00:00 2001
From: dgp <dgp@users.sourceforge.net>
Date: Tue, 30 Jul 2024 16:54:03 +0000
Subject: Plug memory leak in format-19.4.1

---
 generic/tclStringObj.c | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c
index 75b4fdd..258d02b 100644
--- a/generic/tclStringObj.c
+++ b/generic/tclStringObj.c
@@ -2530,12 +2530,18 @@ Tcl_AppendFormatToObj(
 	    TclNewObj(segment);
 	    allocSegment = 1;
 	    if (!Tcl_AttemptSetObjLength(segment, length)) {
+		if (allocSegment) {
+		    Tcl_DecrRefCount(segment);
+		}
 		msg = overflow;
 		errCode = "OVERFLOW";
 		goto errorMsg;
 	    }
 	    bytes = TclGetString(segment);
 	    if (!Tcl_AttemptSetObjLength(segment, snprintf(bytes, segment->length, spec, d))) {
+		if (allocSegment) {
+		    Tcl_DecrRefCount(segment);
+		}
 		msg = overflow;
 		errCode = "OVERFLOW";
 		goto errorMsg;
-- 
cgit v0.12