diff --git a/gnucash-2.3.7-label.patch b/gnucash-2.3.7-label.patch
new file mode 100644
index 0000000..eb339a7
--- /dev/null
+++ b/gnucash-2.3.7-label.patch
@@ -0,0 +1,12 @@
+diff -up gnucash-2.3.7/src/gnome-utils/dialog-utils.c.foo gnucash-2.3.7/src/gnome-utils/dialog-utils.c
+--- gnucash-2.3.7/src/gnome-utils/dialog-utils.c.foo	2009-12-01 12:13:08.000000000 -0500
++++ gnucash-2.3.7/src/gnome-utils/dialog-utils.c	2009-12-01 12:13:33.000000000 -0500
+@@ -907,7 +907,7 @@ gnc_gtk_dialog_add_button (GtkWidget *di
+ {
+   GtkWidget *button;
+ 
+-  button = gtk_button_new_with_label(label);
++  button = gtk_button_new_with_mnemonic(label);
+   if (stock_id) {
+     GtkWidget *image;
+ 
diff --git a/gnucash.spec b/gnucash.spec
index 044ddab..50588e5 100644
--- a/gnucash.spec
+++ b/gnucash.spec
@@ -17,6 +17,7 @@ BuildRequires: desktop-file-utils, texinfo
 BuildRequires: gettext, slib >= 3a1-5, libtool, intltool
 BuildRequires: python-devel, libdbi-devel
 Patch0: gnucash-quiet.patch
+Patch1: gnucash-2.3.7-label.patch
 Requires: gnucash-docs >= 2.2.0
 Requires: slib >= 3a1-5
 Requires: perl(Finance::Quote)
@@ -38,6 +39,7 @@ balanced books.
 %prep
 %setup -q
 %patch0 -p1
+%patch1 -p1
 find src/quotes -name "*.in" -exec sed -i "s|use lib '@-PERLINCL-@';||g" {} \;
 
 %build
@@ -130,6 +132,7 @@ fi
 %changelog
 * Tue Dec  1 2009 Bill Nottingham <notting@redhat.com> - 2.3.7-1
 - Update to development version.
+- Fix accelerators (#533019, #541915)
 
 * Wed Aug 12 2009 Ville Skyttä <ville.skytta@iki.fi> - 2.2.9-3
 - Use lzma compressed upstream tarball.