Index: ChangeLog
===================================================================
RCS file: /cvs/gnome/gtk+/ChangeLog,v
retrieving revision 1.2769
diff -u -r1.2769 ChangeLog
--- ChangeLog	2002/01/08 03:40:04	1.2769
+++ ChangeLog	2002/01/08 21:55:09
@@ -1,3 +1,11 @@
+2002-01-08  Anders Carlsson  <andersca@gnu.org>
+
+	* gtk/gtkwindow.c (gtk_window_mnemonic_activate): Convert
+	the keyval to lowercase. This makes mnemonics work even if
+	capslock is on.
+	(gtk_window_add_mnemonic): Likewise.
+	(gtk_window_remove_mnemonic): Likewise.
+
 2001-01-08  James Henstridge  <james@daa.com.au>
 
 	* gtk/gtkstyle.c: add trailing */ on doc comment.
Index: gtk/gtkwindow.c
===================================================================
RCS file: /cvs/gnome/gtk+/gtk/gtkwindow.c,v
retrieving revision 1.178
diff -u -r1.178 gtkwindow.c
--- gtk/gtkwindow.c	2002/01/08 00:04:52	1.178
+++ gtk/gtkwindow.c	2002/01/08 21:55:09
@@ -1122,7 +1122,7 @@
   g_return_if_fail (GTK_IS_WIDGET (target));
   
   key.window = window;
-  key.keyval = keyval;
+  key.keyval = gdk_keyval_to_lower (keyval);
   mnemonic = g_hash_table_lookup (mnemonic_hash_table, &key);
 
   if (mnemonic)
@@ -1152,7 +1152,7 @@
   g_return_if_fail (GTK_IS_WIDGET (target));
   
   key.window = window;
-  key.keyval = keyval;
+  key.keyval = gdk_keyval_to_lower (keyval);
   mnemonic = g_hash_table_lookup (mnemonic_hash_table, &key);
 
   g_return_if_fail (mnemonic && g_slist_find (mnemonic->targets, target) != NULL);
@@ -1181,9 +1181,9 @@
 
   if (window->mnemonic_modifier != (modifier & gtk_accelerator_get_default_mod_mask ()))
     return FALSE;
-  
+
   key.window = window;
-  key.keyval = keyval;
+  key.keyval = gdk_keyval_to_lower (keyval);
   mnemonic = g_hash_table_lookup (mnemonic_hash_table, &key);
 
   if (!mnemonic)
