mirror of
git://slackware.nl/current.git
synced 2025-01-14 08:01:11 +01:00
a329c449e3
a/shadow-4.17.0-x86_64-1.txz: Upgraded. d/doxygen-1.13.0-x86_64-1.txz: Upgraded. l/PyQt-builder-1.17.1-x86_64-1.txz: Upgraded. xfce/thunar-4.20.0-x86_64-2.txz: Rebuilt. [PATCH] Prevent crash when loading mount point emblem (#1511). Thanks to Panagiotis Nik. extra/brltty/brltty-6.7-x86_64-5.txz: Rebuilt. [PATCH] Tcl-8.6.15 has changed the TCL_PACKAGE_PATH delimiter from spaces to a colon. Thanks to Didier Spaier.
36 lines
1.2 KiB
Diff
36 lines
1.2 KiB
Diff
From 2e86054b29a9c1ebe16fc246b33adb7c5e771684 Mon Sep 17 00:00:00 2001
|
|
From: Dave Mielke <Dave@Mielke.cc>
|
|
Date: Tue, 10 Dec 2024 13:05:18 -0500
|
|
Subject: [PATCH] Tcl-8.6.15 has changed the TCL_PACKAGE_PATH delimiter from
|
|
spaces to a colon.
|
|
|
|
---
|
|
Bindings/Tcl/bindings.m4 | 14 +++++++++++++-
|
|
1 file changed, 13 insertions(+), 1 deletion(-)
|
|
|
|
diff --git a/Bindings/Tcl/bindings.m4 b/Bindings/Tcl/bindings.m4
|
|
index edb59a72e..a30d1945e 100644
|
|
--- a/Bindings/Tcl/bindings.m4
|
|
+++ b/Bindings/Tcl/bindings.m4
|
|
@@ -51,8 +51,20 @@ fi
|
|
|
|
${TCL_OK} && {
|
|
test -n "${TCL_PACKAGE_PATH}" && {
|
|
- for directory in ${TCL_PACKAGE_PATH}
|
|
+ directories="${TCL_PACKAGE_PATH}"
|
|
+
|
|
+ test "${directories#*:}" = "${directories}" && {
|
|
+ # There's no colon so it's an old-style (before tcl-8.6.15) path.
|
|
+ # Replace each sequence of one or more spaces with a single colon.
|
|
+ directories="${directories// /:}"
|
|
+ }
|
|
+
|
|
+ while test "${#directories}" -gt 0
|
|
do
|
|
+ directory="${directories%%:*}"
|
|
+ directories="${directories#*:}"
|
|
+ test "${#directory}" -eq 0 && continue
|
|
+
|
|
test `expr "${directory}" : '.*/lib'` -eq 0 || {
|
|
TCL_DIR="${directory}"
|
|
break
|