Use dzil Authority plugin - remove $AUTHORITY from code
[gitmo/Moose.git] / lib / Moose / Meta / Method / Accessor / Native / Bool / set.pm
CommitLineData
664e417b 1package Moose::Meta::Method::Accessor::Native::Bool::set;
2
3use strict;
4use warnings;
5
8b9641b8 6use Moose::Role;
7
8with 'Moose::Meta::Method::Accessor::Native::Writer' => {
9 -excludes => [
10 qw(
11 _maximum_arguments
a486d5ad 12 _inline_optimized_set_new_value
8b9641b8 13 )
14 ]
7f5ec80d 15 };
664e417b 16
664e417b 17sub _maximum_arguments { 0 }
18
a6ae7438 19sub _potential_value { 1 }
20
a486d5ad 21sub _inline_optimized_set_new_value {
53a4677c 22 my $self = shift;
23 my ($inv, $new, $slot_access) = @_;
664e417b 24
a486d5ad 25 return $slot_access . ' = 1;';
664e417b 26}
27
8b9641b8 28no Moose::Role;
29
664e417b 301;