diff options
Diffstat (limited to 'generic/tkBusy.c')
| -rw-r--r-- | generic/tkBusy.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tkBusy.c b/generic/tkBusy.c index 1846a94..fa526a3 100644 --- a/generic/tkBusy.c +++ b/generic/tkBusy.c @@ -896,7 +896,7 @@ Tk_BusyObjCmd( hPtr = Tcl_NextHashEntry(&cursor)) { busyPtr = Tcl_GetHashValue(hPtr); if (pattern == NULL || - Tcl_StringMatch(Tk_PathName(busyPtr->tkRef), pattern)) { + Tcl_StringCaseMatch(Tk_PathName(busyPtr->tkRef), pattern, 0)) { Tcl_ListObjAppendElement(interp, objPtr, TkNewWindowObj(busyPtr->tkRef)); } |