Tcl_NewWideIntObj -> Tcl_NewBooleanObj (tkMain.c). Some indenting

Author: jan.nijtmans

generic/tkMain.c

@@ -261,8 +261,7 @@ Tk_MainEx(
 	if ((argc >= 3) && (0 == _tcscmp(TEXT("-encoding"), argv[1]))
 		&& ('-' != argv[3][0])) {
 	    Tcl_Obj *value = NewNativeObj(argv[2]);
-	    Tcl_SetStartupScript(NewNativeObj(argv[3]),
-		    Tcl_GetString(value));
+	    Tcl_SetStartupScript(NewNativeObj(argv[3]), Tcl_GetString(value));
 	    Tcl_DecrRefCount(value);
 	    argc -= 3;
 	    i += 3;
@@ -281,7 +280,7 @@ Tk_MainEx(
     }
     Tcl_SetVar2Ex(interp, "argv0", NULL, appName, TCL_GLOBAL_ONLY);
 
-    Tcl_SetVar2Ex(interp, "argc", NULL, Tcl_NewWideIntObj((Tcl_WideInt)argc), TCL_GLOBAL_ONLY);
+    Tcl_SetVar2Ex(interp, "argc", NULL, Tcl_NewWideIntObj(argc), TCL_GLOBAL_ONLY);
 
     argvPtr = Tcl_NewListObj(0, NULL);
     while (argc--) {
@@ -308,7 +307,7 @@ Tk_MainEx(
     }
 #endif
     Tcl_SetVar2Ex(interp, "tcl_interactive", NULL,
-	    Tcl_NewWideIntObj(!path && (is.tty || nullStdin)), TCL_GLOBAL_ONLY);
+	    Tcl_NewBooleanObj(!path && (is.tty || nullStdin)), TCL_GLOBAL_ONLY);
 
     /*
      * Invoke application-specific initialization.

generic/ttk/ttkPanedwindow.c

@@ -1053,9 +1053,9 @@ TtkPanedwindow_Init(Tcl_Interp *interp)
 
     Ttk_RegisterElement(interp, themePtr, "hsash", &SashElementSpec, 0);
     Ttk_RegisterElement(interp, themePtr, "vsash", &SashElementSpec, 0);
-    Ttk_RegisterElement(interp, themePtr, "hgrip", 
+    Ttk_RegisterElement(interp, themePtr, "hgrip",
 	    &GripElementSpec,  INT2PTR(TTK_ORIENT_HORIZONTAL));
-    Ttk_RegisterElement(interp, themePtr, "vgrip", 
+    Ttk_RegisterElement(interp, themePtr, "vgrip",
 	    &GripElementSpec,  INT2PTR(TTK_ORIENT_VERTICAL));
 
     Ttk_RegisterLayout(themePtr, "TPanedwindow", PanedLayout);

tests/filebox.test

@@ -32,7 +32,7 @@ test fileDialog-0.3 {GetFileName: file types: bad filetype} \
 -body {
     # Checks for the Aqua crash reported in ticket 080a28104.
     set filename [tk_getOpenFile -filetypes {
-    	{"Invalid extension" {x.y}}
+	{"Invalid extension" {x.y}}
 	{"All files" {*}}
     }]
 } \