Add a call to Tcl_FindExecutable(). This was inspired by a patch by
Martin von Loewis (whose more elaborate patch to use objects is still
under review).
diff --git a/Modules/_tkinter.c b/Modules/_tkinter.c
index d94ae36..e128c72 100644
--- a/Modules/_tkinter.c
+++ b/Modules/_tkinter.c
@@ -2045,6 +2045,12 @@
Tktt_Type.ob_type = &PyType_Type;
PyDict_SetItemString(d, "TkttType", (PyObject *)&Tktt_Type);
+#if TKMAJORMINOR >= 8000
+ /* This helps the dynamic loader; in Unicode aware Tcl versions
+ it also helps Tcl find its encodings. */
+ Tcl_FindExecutable(Py_GetProgramName());
+#endif
+
if (PyErr_Occurred())
return;