transliterate

commit dddec77c866196b5b19831c2b313769d203c9bb6
parent 18432cb3ce4b608822a449d54cc86ae433acb75b
Author: lumidify <nobody@lumidify.org>
Date:   Mon, 15 Mar 2021 13:57:10 +0100

Revert "Change mnemonics for word choice window"

This reverts commit 18432cb3ce4b608822a449d54cc86ae433acb75b.

Diffstat:
M
transliterate.pl
 | 
7
++-----

1 file changed, 2 insertions(+), 5 deletions(-)
diff --git a/transliterate.pl b/transliterate.pl
@@ -454,13 +454,10 @@ sub prompt_choose_word {
 			}
 			@choices = sort {$choice_nums{$b} <=> $choice_nums{$a}} @choices;
 		}
-		my $cur_num = 5;
+		my $cur_num = 1;
 		foreach my $word_choice (@choices) {
 			# the mnemonics don't make sense when the number has more than one digit
-			# also, to work around other keyboard shortcuts used by the user of this
-			# program, just use 5-0
-			my $mod_num = $cur_num % 10;
-			my $choice_label = $cur_num <= 10 ? "_$mod_num: $word_choice" : $word_choice;
+			my $choice_label = $cur_num <= 9 ? "_$cur_num: $word_choice" : $word_choice;
 			my $button = Gtk3::Button->new($choice_label);
 			$button->signal_connect(
 				clicked => sub {