misc code cleanup

tcltk · Dec 11, 2023 · 47aad1f · 47aad1f
1 parent e3ce3f8
commit 47aad1f
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/tests/unixMenu.test b/tests/unixMenu.test
@@ -75,7 +75,7 @@ test unixMenu-6.2 {TkpSetWindowMenuBar - menu} -constraints unix -setup {
 } -returnCodes ok -result {{} {} {}}
 
 
-test unixMenu-7.1 {TkpSetMainMenubar - nothing to do} -constraints unix -body {}
+test unixMenu-7.1 {Tk_SetMainMenubar - nothing to do} -constraints unix -body {}
 
 
 test unixMenu-8.1 {GetMenuIndicatorGeometry - indicator off} -constraints {

diff --git a/unix/tkUnixSysTray.c b/unix/tkUnixSysTray.c
@@ -1513,7 +1513,7 @@ TrayIconConfigureMethod(
 	}
     }
 
-    if (Tk_SetOptions(interp,(char*)icon,icon->options,objc,objv,
+    if (Tk_SetOptions(interp, icon,icon->options,objc,objv,
             icon->tkwin,&saved,&mask) != TCL_OK) {
 	return TCL_ERROR; /* msg by Tk_SetOptions */
     }