diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-12-14 11:46:52 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-12-14 11:46:52 (GMT) |
| commit | 5357570e1f8319ecea3ce3c930913200ebc485dd (patch) | |
| tree | 5eb91720f2a780a9857925f899b41a90af702333 /generic/tkGet.c | |
| parent | d3accd1f1590ad5fd9a5bac5f611912c8dd9809c (diff) | |
| parent | 953c81157e52a85fb0e0322336b34ee6367ea6d4 (diff) | |
| download | tk-5357570e1f8319ecea3ce3c930913200ebc485dd.zip tk-5357570e1f8319ecea3ce3c930913200ebc485dd.tar.gz tk-5357570e1f8319ecea3ce3c930913200ebc485dd.tar.bz2 | |
Merge 8.6. Make anchorStrings, reliefString and justifyString MODULE_SCOPE
Diffstat (limited to 'generic/tkGet.c')
| -rw-r--r-- | generic/tkGet.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkGet.c b/generic/tkGet.c index cc8c6f9..7df6ead 100644 --- a/generic/tkGet.c +++ b/generic/tkGet.c @@ -35,10 +35,10 @@ static void FreeUidThreadExitProc(ClientData clientData); * used by Tk_GetAnchorFromObj and Tk_GetJustifyFromObj. */ -static const char *const anchorStrings[] = { +const char *const tkAnchorStrings[] = { "n", "ne", "e", "se", "s", "sw", "w", "nw", "center", NULL }; -static const char *const justifyStrings[] = { +const char *const tkJustifyStrings[] = { "left", "right", "center", NULL }; @@ -71,7 +71,7 @@ Tk_GetAnchorFromObj( { int index, code; - code = Tcl_GetIndexFromObj(interp, objPtr, anchorStrings, "anchor", 0, + code = Tcl_GetIndexFromObj(interp, objPtr, tkAnchorStrings, "anchor", 0, &index); if (code == TCL_OK) { *anchorPtr = (Tk_Anchor) index; @@ -385,7 +385,7 @@ Tk_GetJustifyFromObj( { int index, code; - code = Tcl_GetIndexFromObj(interp, objPtr, justifyStrings, + code = Tcl_GetIndexFromObj(interp, objPtr, tkJustifyStrings, "justification", 0, &index); if (code == TCL_OK) { *justifyPtr = (Tk_Justify) index; |