diff options
author | dakkar <dakkar@thenautilus.net> | 2014-12-27 21:47:45 +0000 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2014-12-27 21:47:45 +0000 |
commit | 32de1f4297d950eab7b07d263653a1a6cddedd71 (patch) | |
tree | b3c9fe7e6b66367d842f6e13958573ce35d81e75 | |
parent | nicer idiom for "throw on match fail" (diff) | |
download | net-hawk-32de1f4297d950eab7b07d263653a1a6cddedd71.tar.gz net-hawk-32de1f4297d950eab7b07d263653a1a6cddedd71.tar.bz2 net-hawk-32de1f4297d950eab7b07d263653a1a6cddedd71.zip |
fix exception stringification
-rw-r--r-- | lib/Net/Hawk/Errors.pm | 6 |
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>' })"; } } |