From e3e4115ac58b377dc5f9cc4c0205daba649cce3b Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Thu, 11 May 2006 19:31:40 +0000
Subject: [PATCH] fix case-insensitive search

svn: r2908
---
 src/mred/wxme/wx_mpriv.cxx | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

diff --git a/src/mred/wxme/wx_mpriv.cxx b/src/mred/wxme/wx_mpriv.cxx
index f0d39374f4..a92c03247c 100644
--- a/src/mred/wxme/wx_mpriv.cxx
+++ b/src/mred/wxme/wx_mpriv.cxx
@@ -649,14 +649,11 @@ long wxMediaEdit::_FindStringAll(wxchar *str, int direction,
     return -1;
 
   if (!caseSens) {
-    /* FIXME: use locale... */
     oldStr = str;
     str = new WXGC_ATOMIC wxchar[slen + 1];
     for (i = 0; i < slen; i++) {
-      if (str[i] < 128)
-	str[i] = tolower(oldStr[i]);
-      else
-	str[i] = oldStr[i];
+      c = oldStr[i];
+      str[i] = scheme_tofold(c);
     }
     str[i] = 0;
   }
@@ -741,8 +738,7 @@ long wxMediaEdit::_FindStringAll(wxchar *str, int direction,
       while(n--) {
 	c = text[i];
 	if (!caseSens)
-	  if (c >= 'A' && c <= 'Z')
-	    c += ('a' - 'A');
+	  c = scheme_tofold(c);
 	while ((s != beyond) && (str[s + direction] != c)) {
 	  s = smap[s];
 	}