summaryrefslogtreecommitdiffstats
path: root/unix/tkUnixFont.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-02-14 10:21:09 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-02-14 10:21:09 (GMT)
commit597be5ef8e34b8a6f93596f2674bff537d143fe4 (patch)
treed8dd51ef91f54b28963a5649db96dba7043d4d85 /unix/tkUnixFont.c
parentf1f70ca3742996e2513e639bd5f7a4a2df72770d (diff)
downloadtk-597be5ef8e34b8a6f93596f2674bff537d143fe4.zip
tk-597be5ef8e34b8a6f93596f2674bff537d143fe4.tar.gz
tk-597be5ef8e34b8a6f93596f2674bff537d143fe4.tar.bz2
A few missing (internal) "const" modifiers.
Diffstat (limited to 'unix/tkUnixFont.c')
-rw-r--r--unix/tkUnixFont.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/tkUnixFont.c b/unix/tkUnixFont.c
index d95527b..cfeed1b 100644
--- a/unix/tkUnixFont.c
+++ b/unix/tkUnixFont.c
@@ -839,7 +839,7 @@ TkpGetFontFamilies(
Tk_Window tkwin) /* For display to query. */
{
int i, new, numNames;
- char *family, **nameList;
+ const char *family, **nameList;
Tcl_HashTable familyTable;
Tcl_HashEntry *hPtr;
Tcl_HashSearch search;
@@ -848,7 +848,7 @@ TkpGetFontFamilies(
Tcl_InitHashTable(&familyTable, TCL_STRING_KEYS);
nameList = ListFonts(Tk_Display(tkwin), "*", &numNames);
for (i = 0; i < numNames; i++) {
- char *familyEnd;
+ const char *familyEnd;
family = strchr(nameList[i] + 1, '-');
if (family == NULL) {