diff options
| author | Zoffix Znet <cpan@zoffix.com> | 2016-05-19 19:49:39 -0400 |
|---|---|---|
| committer | Zoffix Znet <cpan@zoffix.com> | 2016-05-19 19:49:39 -0400 |
| commit | 3f65d48264430428a2165f6a9f5a4e16f823f6b8 (patch) | |
| tree | 6da1f46181c3070b3eeb4ede56c3cba3623d0258 /lib/old-IRC/Client | |
| parent | e997c1b0b5ad796425abfc9f81b91947357172ce (diff) | |
Start new design docs
Diffstat (limited to 'lib/old-IRC/Client')
| -rw-r--r-- | lib/old-IRC/Client/Plugin.pm6 | 3 | ||||
| -rw-r--r-- | lib/old-IRC/Client/Plugin/Debugger.pm6 | 8 | ||||
| -rw-r--r-- | lib/old-IRC/Client/Plugin/PingPong.pm6 | 2 |
3 files changed, 13 insertions, 0 deletions
diff --git a/lib/old-IRC/Client/Plugin.pm6 b/lib/old-IRC/Client/Plugin.pm6 new file mode 100644 index 0000000..d73d7bd --- /dev/null +++ b/lib/old-IRC/Client/Plugin.pm6 @@ -0,0 +1,3 @@ +constant IRC_HANDLED = "irc plugin handled \x1"; +constant IRC_NOT_HANDLED = "irc plugin not-handled \x2"; +unit class IRC::Client::Plugin; diff --git a/lib/old-IRC/Client/Plugin/Debugger.pm6 b/lib/old-IRC/Client/Plugin/Debugger.pm6 new file mode 100644 index 0000000..13b1461 --- /dev/null +++ b/lib/old-IRC/Client/Plugin/Debugger.pm6 @@ -0,0 +1,8 @@ +use Data::Dump; +use IRC::Client::Plugin; +unit class IRC::Client::Plugin::Debugger is IRC::Client::Plugin; + +method irc-all-events ($irc, $e) { + say Dump $e, :indent(4); + return IRC_NOT_HANDLED; +} diff --git a/lib/old-IRC/Client/Plugin/PingPong.pm6 b/lib/old-IRC/Client/Plugin/PingPong.pm6 new file mode 100644 index 0000000..2651fd6 --- /dev/null +++ b/lib/old-IRC/Client/Plugin/PingPong.pm6 @@ -0,0 +1,2 @@ +unit class IRC::Client::Plugin::PingPong; +method irc-ping ($irc, $e) { $irc.ssay("PONG {$irc.nick} $e<params>[0]") } |