aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--META6.json4
-rw-r--r--lib/IRC/Client/Grammar.pm62
2 files changed, 3 insertions, 3 deletions
diff --git a/META6.json b/META6.json
index 87b5811..a669bc2 100644
--- a/META6.json
+++ b/META6.json
@@ -2,7 +2,7 @@
"perl" : "6.c",
"name" : "IRC::Client",
"license" : "Artistic-2.0",
- "version" : "3.007003",
+ "version" : "3.007004",
"description" : "Extendable Internet Relay Chat client",
"tags" : [ "Net", "IRC" ],
"depends" : [
@@ -21,5 +21,5 @@
"IRC::Client::Server" : "lib/IRC/Client/Server.pm6"
},
"authors" : ["Zoffix Znet"],
- "support" : {"source" : "git://github.com/zoffixznet/perl6-IRC-Client.git"}
+ "support" : {"source" : "https://github.com/zoffixznet/perl6-IRC-Client.git"}
}
diff --git a/lib/IRC/Client/Grammar.pm6 b/lib/IRC/Client/Grammar.pm6
index a80b79f..4037d43 100644
--- a/lib/IRC/Client/Grammar.pm6
+++ b/lib/IRC/Client/Grammar.pm6
@@ -3,7 +3,7 @@ token TOP { <message>+ <left-overs> }
token left-overs { \N* }
token SPACE { ' '+ }
token message { [':' <prefix> <SPACE> ]? <command> <params> \n }
- token prefix {
+ regex prefix {
[ <servername> || <nick> ['!' <user>]? ['@' <host>]? ]
<before <SPACE>>
}