From 3000594d2f17a9fa51355bb71f159906fa0e3c18 Mon Sep 17 00:00:00 2001
From: David Bailes <DavidBailes@users.noreply.github.com>
Date: Tue, 12 May 2015 09:29:55 +0100
Subject: [PATCH] Improving accessibility of dialog for entering the name of a
 new chain. Jaws does not read the text in the dialog by default, and the
 accessibility names of the controls in the dialog cannot be set, so the best
 that can be done is to have a meaningful title for the dialog, and set the
 accessibility name of the dialog so that nvda can read it.

---
 src/BatchProcessDialog.cpp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/BatchProcessDialog.cpp b/src/BatchProcessDialog.cpp
index aec154e5a..8b52b9deb 100644
--- a/src/BatchProcessDialog.cpp
+++ b/src/BatchProcessDialog.cpp
@@ -710,7 +710,8 @@ void EditChainsDialog::OnAdd(wxCommandEvent & WXUNUSED(event))
    while (true) {
       wxTextEntryDialog d(this,
                           _("Enter name of new chain"),
-                          GetTitle());
+                          _("Name of new chain"));
+      d.SetName(d.GetTitle());
       wxString name;
 
       if (d.ShowModal() == wxID_CANCEL) {