aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authordakkar <dakkar@thenautilus.net>2014-12-27 21:47:45 +0000
committerdakkar <dakkar@thenautilus.net>2014-12-27 21:47:45 +0000
commit32de1f4297d950eab7b07d263653a1a6cddedd71 (patch)
treeb3c9fe7e6b66367d842f6e13958573ce35d81e75
parentnicer idiom for "throw on match fail" (diff)
downloadnet-hawk-32de1f4297d950eab7b07d263653a1a6cddedd71.tar.gz
net-hawk-32de1f4297d950eab7b07d263653a1a6cddedd71.tar.bz2
net-hawk-32de1f4297d950eab7b07d263653a1a6cddedd71.zip
fix exception stringification
-rw-r--r--lib/Net/Hawk/Errors.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Net/Hawk/Errors.pm b/lib/Net/Hawk/Errors.pm
index 3172865..a06c5cc 100644
--- a/lib/Net/Hawk/Errors.pm
+++ b/lib/Net/Hawk/Errors.pm
@@ -2,14 +2,14 @@ package Net::Hawk::Errors {
use v6;
class base is Exception {
has $.text;
- sub message { return "{.text}" }
+ method message { return "{self.text}" }
}
class BadRequest is base {
has $.value;
- sub message {
- return "{ .text } ({ .value // '<undef>' })";
+ method message {
+ return "{ self.text } ({ self.value // '<undef>' })";
}
}