summaryrefslogtreecommitdiff
path: root/lib/Enigmatic/Rotor.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Enigmatic/Rotor.pm')
-rw-r--r--lib/Enigmatic/Rotor.pm10
1 files changed, 10 insertions, 0 deletions
diff --git a/lib/Enigmatic/Rotor.pm b/lib/Enigmatic/Rotor.pm
index 792c7b5..e0a3b97 100644
--- a/lib/Enigmatic/Rotor.pm
+++ b/lib/Enigmatic/Rotor.pm
@@ -1,6 +1,7 @@
package Enigmatic::Rotor;
use DAKKAR::p 'class';
use Enigmatic::Types qw(WiringMap Letter RotorPos);
+use MooseX::Types::Set::Object;
has wiring => (
is => 'ro',
@@ -14,6 +15,15 @@ has ring_setting => (
default => 0,
);
+has notches => (
+ isa => 'Set::Object',
+ coerce => 1,
+ handles => {
+ has_notch_at => 'member',
+ },
+ default => sub { [] },
+);
+
with 'Enigmatic::Role::WithWiring';
sub map {