diff --git a/Modules/_tkinter.c b/Modules/_tkinter.c
index 97f85f9..d45e2d4 100644
--- a/Modules/_tkinter.c
+++ b/Modules/_tkinter.c
@@ -583,7 +583,7 @@
 static void DisableEventHook(void); /* Forward */
 
 static TkappObject *
-Tkapp_New(char *screenName, char *baseName, char *className,
+Tkapp_New(char *screenName, char *className,
 	  int interactive, int wantobjects, int	wantTk, int sync, char *use)
 {
 	TkappObject *v;
@@ -2812,7 +2812,8 @@
 Tkinter_Create(PyObject *self, PyObject *args)
 {
 	char *screenName = NULL;
-	char *baseName = NULL;
+	char *baseName = NULL; /* XXX this is not used anymore;
+				  try getting rid of it. */
 	char *className = NULL;
 	int interactive = 0;
 	int wantobjects = 0;
@@ -2820,11 +2821,6 @@
 	int sync = 0; /* pass -sync to wish */
 	char *use = NULL; /* pass -use to wish */
 
-	baseName = strrchr(Py_GetProgramName(), '/');
-	if (baseName != NULL)
-		baseName++;
-	else
-		baseName = Py_GetProgramName();
 	className = "Tk";
 
 	if (!PyArg_ParseTuple(args, "|zssiiiiz:create",
@@ -2833,7 +2829,7 @@
 			      &sync, &use))
 		return NULL;
 
-	return (PyObject *) Tkapp_New(screenName, baseName, className,
+	return (PyObject *) Tkapp_New(screenName, className,
 				      interactive, wantobjects,	wantTk,
 				      sync, use);
 }