diff options
| author | David Phillips <david@sighup.nz> | 2018-09-17 17:50:53 +1200 |
|---|---|---|
| committer | David Phillips <david@sighup.nz> | 2018-09-17 17:51:02 +1200 |
| commit | 0168a87290dccb8548b4943aca6a43b1a2567a96 (patch) | |
| tree | 59f657c45c3e0aeca7586c07808a67430e499b66 /Plugin/Random.pm | |
| parent | acc3dd54a4c861e2cb02f0c3cb29ea40ce16f706 (diff) | |
| download | idalius-0168a87290dccb8548b4943aca6a43b1a2567a96.tar.xz | |
Add must_id functionality back
Fixes regression in acc3dd54a4c861e2cb02f0c3cb29ea40ce16f706
Diffstat (limited to 'Plugin/Random.pm')
| -rw-r--r-- | Plugin/Random.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Plugin/Random.pm b/Plugin/Random.pm index 27332f8..cea65fb 100644 --- a/Plugin/Random.pm +++ b/Plugin/Random.pm @@ -16,13 +16,13 @@ sub configure { } sub shuffle { - my ($self, $irc, $logger, $who, $where, $rest, @arguments) = @_; + my ($self, $irc, $logger, $who, $where, $ided, $rest, @arguments) = @_; return join " ", List::Util::shuffle(@arguments); } sub choose { - my ($self, $irc, $logger, $who, $where, $rest, @arguments) = @_; + my ($self, $irc, $logger, $who, $where, $ided, $rest, @arguments) = @_; return (List::Util::shuffle(@arguments))[0]; } 1; |