diff options
author | Jesse Luehrs <doy@tozt.net> | 2011-03-04 15:45:59 -0600 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2011-03-04 15:45:59 -0600 |
commit | 92fbbb7b7a4fb00c4c37ac17b8f2cd9b9905ebd2 (patch) | |
tree | 57bca2d7089d6da5394900a9e16f1e0bfcbb04f8 | |
parent | bc368289ef4f5b7b7a1fbd144570783259328830 (diff) | |
download | bread-board-declare-92fbbb7b7a4fb00c4c37ac17b8f2cd9b9905ebd2.tar.gz bread-board-declare-92fbbb7b7a4fb00c4c37ac17b8f2cd9b9905ebd2.zip |
fix inlining for moose 2.0
-rw-r--r-- | lib/Bread/Board/Declare/Meta/Role/Attribute.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm index 23434e4..d4d59b9 100644 --- a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm +++ b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm @@ -222,9 +222,9 @@ if (Moose->VERSION > 1.9900) { . '}' . "\n" . 'else {' . "\n" . '$val = ' . $instance . '->get_service(\'' . $self->name . '\')->get;' . "\n" - . $self->_inline_check_constraint( + . join("\n", $self->_inline_check_constraint( '$val', '$type_constraint', '$type_constraint_obj' - ) + )) . "\n" . '}' . "\n" . '$val' . "\n" . '}'; |