diff options
Diffstat (limited to 'lib/IRC/Client/Message')
-rw-r--r-- | lib/IRC/Client/Message/Numeric.pm6 | 4 | ||||
-rw-r--r-- | lib/IRC/Client/Message/Privmsg.pm6 | 4 | ||||
-rw-r--r-- | lib/IRC/Client/Message/Privmsg/Channel.pm6 | 5 | ||||
-rw-r--r-- | lib/IRC/Client/Message/Privmsg/Me.pm6 | 2 | ||||
-rw-r--r-- | lib/IRC/Client/Message/Unknown.pm6 | 4 |
5 files changed, 15 insertions, 4 deletions
diff --git a/lib/IRC/Client/Message/Numeric.pm6 b/lib/IRC/Client/Message/Numeric.pm6 index 38e9a26..c059eb4 100644 --- a/lib/IRC/Client/Message/Numeric.pm6 +++ b/lib/IRC/Client/Message/Numeric.pm6 @@ -1,6 +1,2 @@ use IRC::Client::Message; unit role IRC::Client::Message::Numeric does IRC::Client::Message; - -has @.args; - -method Str { "$.command @.args[]" } diff --git a/lib/IRC/Client/Message/Privmsg.pm6 b/lib/IRC/Client/Message/Privmsg.pm6 new file mode 100644 index 0000000..31efdea --- /dev/null +++ b/lib/IRC/Client/Message/Privmsg.pm6 @@ -0,0 +1,4 @@ +use IRC::Client::Message; +unit role IRC::Client::Message::Privmsg does IRC::Client::Message; + +has $.what; diff --git a/lib/IRC/Client/Message/Privmsg/Channel.pm6 b/lib/IRC/Client/Message/Privmsg/Channel.pm6 new file mode 100644 index 0000000..36cf3d6 --- /dev/null +++ b/lib/IRC/Client/Message/Privmsg/Channel.pm6 @@ -0,0 +1,5 @@ +use IRC::Client::Message::Privmsg; +unit role IRC::Client::Message::Privmsg::Channel + does IRC::Client::Message::Privmsg; + +has $.channel; diff --git a/lib/IRC/Client/Message/Privmsg/Me.pm6 b/lib/IRC/Client/Message/Privmsg/Me.pm6 new file mode 100644 index 0000000..1ff31ba --- /dev/null +++ b/lib/IRC/Client/Message/Privmsg/Me.pm6 @@ -0,0 +1,2 @@ +use IRC::Client::Message::Privmsg; +unit role IRC::Client::Message::Privmsg::Me does IRC::Client::Message::Privmsg; diff --git a/lib/IRC/Client/Message/Unknown.pm6 b/lib/IRC/Client/Message/Unknown.pm6 new file mode 100644 index 0000000..91baa79 --- /dev/null +++ b/lib/IRC/Client/Message/Unknown.pm6 @@ -0,0 +1,4 @@ +use IRC::Client::Message; +unit role IRC::Client::Message::Unknown does IRC::Client::Message; + +method Str { "❚⚠❚ $.command @.args[]" } |