From ef0a9de8eb4a8c1bf3e82d18b1dadd54637a7c98 Mon Sep 17 00:00:00 2001 From: Zoffix Znet Date: Wed, 25 Nov 2015 13:32:59 -0500 Subject: Intermediary --- lib/IRC/Client/Plugin.pm6 | 8 ++++++++ lib/IRC/Client/Plugin/HNY.pm6 | 8 ++++++++ 2 files changed, 16 insertions(+) create mode 100644 lib/IRC/Client/Plugin.pm6 create mode 100644 lib/IRC/Client/Plugin/HNY.pm6 (limited to 'lib/IRC/Client') diff --git a/lib/IRC/Client/Plugin.pm6 b/lib/IRC/Client/Plugin.pm6 new file mode 100644 index 0000000..724447e --- /dev/null +++ b/lib/IRC/Client/Plugin.pm6 @@ -0,0 +1,8 @@ +use v6; +use IRC::Client; +unit role IRC::Client::Plugin:ver<1.001001>; + +multi method inverval ( ) { 0 } +multi method inverval (IRC::Client) { ... } +multi method msg ( ) { False } +multi method msg (IRC::Client) { ... } diff --git a/lib/IRC/Client/Plugin/HNY.pm6 b/lib/IRC/Client/Plugin/HNY.pm6 new file mode 100644 index 0000000..7f52302 --- /dev/null +++ b/lib/IRC/Client/Plugin/HNY.pm6 @@ -0,0 +1,8 @@ +use v6; +use IRC::Client; +use IRC::Client::Plugin; +unit class IRC::Client::Plugin::HNY:ver<1.001001> does IRC::Client::Plugin; +multi method interval ( ) { 2 } +multi method interval (IRC::Client $irc) { + $irc.ssay("5 seconds passed. Time is now " ~ now); +} -- cgit v1.1