diff options
| author | fvogel <fvogelnew1@free.fr> | 2018-05-01 12:48:52 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2018-05-01 12:48:52 (GMT) |
| commit | 3ea798378d071bcd179217432c8fe760976f8445 (patch) | |
| tree | c47f810b00385dde7361c004622c5155ef86b774 /macosx/tkMacOSXDialog.c | |
| parent | 4ac45f804f667661e9260de1cb319c6ce72e97ac (diff) | |
| download | tk-3ea798378d071bcd179217432c8fe760976f8445.zip tk-3ea798378d071bcd179217432c8fe760976f8445.tar.gz tk-3ea798378d071bcd179217432c8fe760976f8445.tar.bz2 | |
Unify further error messages for tk_messageBox options
Diffstat (limited to 'macosx/tkMacOSXDialog.c')
| -rw-r--r-- | macosx/tkMacOSXDialog.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/macosx/tkMacOSXDialog.c b/macosx/tkMacOSXDialog.c index b98d6d8..1effe48 100644 --- a/macosx/tkMacOSXDialog.c +++ b/macosx/tkMacOSXDialog.c @@ -117,7 +117,7 @@ enum alertIconOptions { ICON_ERROR, ICON_INFO, ICON_QUESTION, ICON_WARNING }; static const char *const alertButtonStrings[] = { - "abort", "retry", "ignore", "ok", "cancel", "yes", "no", NULL + "abort", "retry", "ignore", "ok", "cancel", "no", "yes", NULL }; static const NSString *const alertButtonNames[][3] = { @@ -1330,7 +1330,7 @@ Tk_MessageBoxObjCmd( case ALERT_ICON: if (Tcl_GetIndexFromObjStruct(interp, objv[i + 1], alertIconStrings, - sizeof(char *), "value", TCL_EXACT, &iconIndex) != TCL_OK) { + sizeof(char *), "-icon value", TCL_EXACT, &iconIndex) != TCL_OK) { goto end; } break; @@ -1360,7 +1360,7 @@ Tk_MessageBoxObjCmd( case ALERT_TYPE: if (Tcl_GetIndexFromObjStruct(interp, objv[i + 1], alertTypeStrings, - sizeof(char *), "value", TCL_EXACT, &typeIndex) != TCL_OK) { + sizeof(char *), "-type value", TCL_EXACT, &typeIndex) != TCL_OK) { goto end; } break; @@ -1376,7 +1376,7 @@ Tk_MessageBoxObjCmd( */ if (Tcl_GetIndexFromObjStruct(interp, objv[indexDefaultOption + 1], - alertButtonStrings, sizeof(char *), "value", TCL_EXACT, &index) != TCL_OK) { + alertButtonStrings, sizeof(char *), "-default value", TCL_EXACT, &index) != TCL_OK) { goto end; } |