sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed a minor retract bug in Werewolf.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-04-09 19:36:46 -06:00
1 parent 1e45c53d38
commit 6dd9ab5322
2 files changed
+4 -2
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

doc/CHANGELOG
+1
View File
@@ -3,6 +3,7 @@ Auto IRC Bot 3.0: Change Log
3.0 Indev 3.0 Indev
=============================================================================== ===============================================================================
* Fixed a minor retract bug in Werewolf.
* Fixed two major bugs in Werewolf that messed up game play. * Fixed two major bugs in Werewolf that messed up game play.
* Fixed several bugs and changed around JOIN/START/BEGIN in Werewolf. * Fixed several bugs and changed around JOIN/START/BEGIN in Werewolf.
* Fixed parsing of host masks with / in them. (if it was broken) * Fixed parsing of host masks with / in them. (if it was broken)
modules/Werewolf.pm
+3 -2
View File
@@ -384,14 +384,15 @@ sub cmd_wolf {
} }
# Delete their vote. # Delete their vote.
my $hvi; my ($hvi, $target);
foreach my $plyr (keys %LYNCH) { foreach my $plyr (keys %LYNCH) {
if (exists $LYNCH{$plyr}{lc $src->{nick}}) { $hvi = 1; delete $LYNCH{$plyr}{lc $src->{nick}} } if (exists $LYNCH{$plyr}{lc $src->{nick}}) { $hvi = 1; delete $LYNCH{$plyr}{lc $src->{nick}}; $target = $plyr }
} }
# Done. # Done.
if ($hvi) { if ($hvi) {
privmsg($src->{svr}, $src->{chan}, "\2$src->{nick}\2 retracted his/her vote."); privmsg($src->{svr}, $src->{chan}, "\2$src->{nick}\2 retracted his/her vote.");
if (!keys %{$LYNCH{$target}}) { delete $LYNCH{$target} }
} }
else { else {
notice($src->{svr}, $src->{nick}, 'You haven\'t voted yet.'); notice($src->{svr}, $src->{nick}, 'You haven\'t voted yet.');