{"body":"    my $poll = await $message.channel.send-message(embed => %payload).then(-> $p {\n        my $m = $p.result;\n        await $m.add-reaction($reaction-for-emote);\n        sleep(1/2);\n        await $m.add-reaction($reaction-against-emote);\n\n        $m;\n    });\n\n    start react {\n        whenever Promise.in($voting-timeout) { done }\n\n        my Int $yes-votes = 0;\n        my Int $no-votes = 0;\n\n        whenever $poll.events -> $event {\n            if $event<t> eq 'MESSAGE_REACTION_ADD' {\n                $yes-votes++ if $event<d><emoji><name> eq $reaction-for-emote;\n                $no-votes++ if $event<d><emoji><name> eq $reaction-against-emote;\n                $message.channel.send-message(\"yes: $yes-votes, no: $no-votes\");\n            }\n            elsif $event<t> eq 'MESSAGE_REACTION_REMOVE' {\n                $yes-votes-- if $event<d><emoji><name> eq $reaction-for-emote;\n                $no-votes-- if $event<d><emoji><name> eq $reaction-against-emote;\n                $message.channel.send-message(\"yes: $yes-votes, no: $no-votes\");\n            }\n        }\n    }","name":"","extension":"txt","url":"https://www.irccloud.com/pastebin/R3ukTWoV","modified":1584443012,"id":"R3ukTWoV","size":1076,"lines":28,"own_paste":false,"theme":"","date":1584443012}