Browse files

include actual Range object in X::OutOfRange error from Date.new

  • Loading branch information...
1 parent 9d39e88 commit c295b5342a6359d1a5183332abcfb064f0992a15 @moritz moritz committed Feb 26, 2012
Showing with 2 additions and 2 deletions.
  1. +1 −1 src/core/Exceptions.pm
  2. +1 −1 src/core/Temporal.pm
View
2 src/core/Exceptions.pm
@@ -41,7 +41,7 @@ my class X::OutOfRange is Exception {
has $.got = '<unknown>';
has $.range = '<unknown>';
method message() {
- "$.what out of range. Is: $.got, should be in $.range"
+ "$.what out of range. Is: $.got, should be in $.range.gist()"
}
}
View
2 src/core/Temporal.pm
@@ -95,7 +95,7 @@ my role Dateish {
or die X::OutOfRange.new(
what => $name,
got => $val,
- range => $range.perl,
+ range => $range,
);
}

0 comments on commit c295b53

Please sign in to comment.