aboutsummaryrefslogtreecommitdiff
path: root/src/bin/pgtclsh/pgtkAppInit.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/bin/pgtclsh/pgtkAppInit.c')
-rw-r--r--src/bin/pgtclsh/pgtkAppInit.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/src/bin/pgtclsh/pgtkAppInit.c b/src/bin/pgtclsh/pgtkAppInit.c
index bdb569cb3c9..0bf685bd1a3 100644
--- a/src/bin/pgtclsh/pgtkAppInit.c
+++ b/src/bin/pgtclsh/pgtkAppInit.c
@@ -75,13 +75,9 @@ int
Tcl_AppInit(Tcl_Interp * interp)
{
if (Tcl_Init(interp) == TCL_ERROR)
- {
return TCL_ERROR;
- }
if (Tk_Init(interp) == TCL_ERROR)
- {
return TCL_ERROR;
- }
/*
* Call the init procedures for included packages. Each call should
@@ -93,9 +89,7 @@ Tcl_AppInit(Tcl_Interp * interp)
*/
if (Pgtcl_Init(interp) == TCL_ERROR)
- {
return TCL_ERROR;
- }
/*
* Call Tcl_CreateCommand for application-specific commands, if they