Add votename to Menu.
Display the current voting's description. Also purge some dead code. Picked from upstream. Signed-off-by: Thomas Hochstein <thh@inter.net>
This commit is contained in:
parent
c1cc3954b4
commit
3aca529725
3
CHANGES
3
CHANGES
|
@ -20,6 +20,9 @@ Version 4.12 (19.01.2014):
|
||||||
Wahlschein und einem Musterwahlschein (wie im CfV geposted) zu starten.
|
Wahlschein und einem Musterwahlschein (wie im CfV geposted) zu starten.
|
||||||
Dazu muss die Config-Option "sampleballotfile" gesetzt und die Datei
|
Dazu muss die Config-Option "sampleballotfile" gesetzt und die Datei
|
||||||
vorhanden sein (Standard-Dateiname: ballot.sample)
|
vorhanden sein (Standard-Dateiname: ballot.sample)
|
||||||
|
- im Fehlermenue wird nun der Name der Abstimmung als Ueberschrift
|
||||||
|
angezeigt. Ausserdem wurde in UVmenu.pm ein redundanter Code-Abschnitt
|
||||||
|
entfernt
|
||||||
|
|
||||||
Version 4.11 (25.09.2012):
|
Version 4.11 (25.09.2012):
|
||||||
- Regular Expression fuer Pruefung des Abstimmungsnamens verbessert.
|
- Regular Expression fuer Pruefung des Abstimmungsnamens verbessert.
|
||||||
|
|
17
UVmenu.pm
17
UVmenu.pm
|
@ -60,6 +60,7 @@ sub menu {
|
||||||
while (1) {
|
while (1) {
|
||||||
|
|
||||||
system($config{clearcmd});
|
system($config{clearcmd});
|
||||||
|
print "-> $config{votename} <-\n";
|
||||||
print UVmessage::get("MENU_PROBLEMS") . "\n";
|
print UVmessage::get("MENU_PROBLEMS") . "\n";
|
||||||
|
|
||||||
foreach my $error (keys %errors) {
|
foreach my $error (keys %errors) {
|
||||||
|
@ -300,22 +301,6 @@ sub menu {
|
||||||
$errors{WrongVoting} = UVmessage::get("MENU_WRONGVOTING");
|
$errors{WrongVoting} = UVmessage::get("MENU_WRONGVOTING");
|
||||||
}
|
}
|
||||||
|
|
||||||
} elsif ($input eq '7') {
|
|
||||||
my $sel;
|
|
||||||
do {
|
|
||||||
print "[a] ", UVmessage::get("MENU_VOTING_CORRECT"), "\n",
|
|
||||||
"[b] ", UVmessage::get("MENU_VOTING_WRONG"), "\n\n",
|
|
||||||
UVmessage::get("MENU_PROMPT");
|
|
||||||
$sel = <STDIN>;
|
|
||||||
} until ($sel =~ /^[ab]$/i);
|
|
||||||
|
|
||||||
if ($sel =~ /^a$/i) {
|
|
||||||
delete $errors{NoVoting};
|
|
||||||
delete $errors{WrongVoting};
|
|
||||||
} else {
|
|
||||||
$errors{WrongVoting} = UVmessage::get("MENU_WRONGVOTING");
|
|
||||||
}
|
|
||||||
|
|
||||||
} elsif ($input =~ /^i$/i) {
|
} elsif ($input =~ /^i$/i) {
|
||||||
my $ignore = UVmessage::get("MENU_IGNORE_STRING");
|
my $ignore = UVmessage::get("MENU_IGNORE_STRING");
|
||||||
# Set columns for Text::Wrap
|
# Set columns for Text::Wrap
|
||||||
|
|
Loading…
Reference in a new issue