diff --git a/capplets/theme-switcher/ChangeLog b/capplets/theme-switcher/ChangeLog
index a330d8655..1a18b63fd 100644
--- a/capplets/theme-switcher/ChangeLog
+++ b/capplets/theme-switcher/ChangeLog
@@ -1,3 +1,8 @@
+2001-09-29  Richard Hestilow  <hestilow@ximian.com>
+
+	* gui.c (sort_alpha): Use g_strcasecmp, not strcmp.
+	Fixes bug #13539.
+
 2001-09-29  Richard Hestilow  <hestilow@ximian.com>
 
 	* lister.c: (list_themes, list_system_themes, list_user_themes):
diff --git a/capplets/theme-switcher/gui.c b/capplets/theme-switcher/gui.c
index ae088f2a2..8287c2882 100644
--- a/capplets/theme-switcher/gui.c
+++ b/capplets/theme-switcher/gui.c
@@ -533,7 +533,7 @@ static gint sort_alpha(const void *a, const void *b)
   A = a;
   B = b;
   
-  return strcmp(A->name, B->name);
+  return g_strcasecmp(A->name, B->name);
 }
 
 static void
diff --git a/capplets/theme-switcher/gui.c-6060 b/capplets/theme-switcher/gui.c-6060
index ae088f2a2..8287c2882 100644
--- a/capplets/theme-switcher/gui.c-6060
+++ b/capplets/theme-switcher/gui.c-6060
@@ -533,7 +533,7 @@ static gint sort_alpha(const void *a, const void *b)
   A = a;
   B = b;
   
-  return strcmp(A->name, B->name);
+  return g_strcasecmp(A->name, B->name);
 }
 
 static void