GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2025-05-03 21:27:31 +02:00
Code Issues Projects Releases Wiki Activity

Factoids: fix issue where pick_unique() could repeat a selection

Browse Source
This commit is contained in:
Pragmatic Software 2020-06-14 22:34:24 -07:00
parent f71eb269cb
commit 0b94ada897
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
PBot/Factoids.pm
View File

@ -622,12 +622,15 @@ sub select_item {
my $index = int rand @$list; my $index = int rand @$list;
my $choice = $list->[$index]; my $choice = $list->[$index];
# strip outer quotes
if (not $choice =~ s/^"(.*)"$/$1/) { $choice =~ s/^'(.*)'$/$1/; }
push @choices, $choice; push @choices, $choice;
} }
# strip outer quotes
foreach my $choice (@choices) {
if (not $choice =~ s/^"(.*)"$/$1/) { $choice =~ s/^'(.*)'$/$1/; }
}
if ($settings{'sort+'}) { if ($settings{'sort+'}) {
@choices = sort { $a cmp $b } @choices; @choices = sort { $a cmp $b } @choices;
} }