diff -urN tcl8.2-8.2.0.orig/generic/tclCmdIL.c tcl8.2-8.2.0/generic/tclCmdIL.c
--- tcl8.2-8.2.0.orig/generic/tclCmdIL.c	Tue Aug 10 12:35:18 1999
+++ tcl8.2-8.2.0/generic/tclCmdIL.c	Thu Aug 19 21:18:51 1999
@@ -3618,7 +3618,7 @@
 	objPtr2 = objPtr;
     }
     if (infoPtr->sortMode == SORTMODE_ASCII) {
-	order = strcmp(Tcl_GetString(objPtr1), Tcl_GetString(objPtr2));
+	order = strcoll(Tcl_GetString(objPtr1), Tcl_GetString(objPtr2));
     } else if (infoPtr->sortMode == SORTMODE_DICTIONARY) {
 	order = DictionaryCompare(
 		Tcl_GetString(objPtr1),	Tcl_GetString(objPtr2));
