diff options
author | dakkar <dakkar@thenautilus.net> | 2011-08-29 19:16:26 +0100 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2011-08-29 19:16:26 +0100 |
commit | 2b28ab91084f37a5e9014737d0df694587fe60cf (patch) | |
tree | 5aa4089d4b3589584d1b6e945184a2fad51b62e6 /lib/Enigmatic/Machine.pm | |
parent | full-machine and tests (diff) | |
download | Enigmatic-2b28ab91084f37a5e9014737d0df694587fe60cf.tar.gz Enigmatic-2b28ab91084f37a5e9014737d0df694587fe60cf.tar.bz2 Enigmatic-2b28ab91084f37a5e9014737d0df694587fe60cf.zip |
fixed rotor ring settings
and removed debug prints
Diffstat (limited to 'lib/Enigmatic/Machine.pm')
-rw-r--r-- | lib/Enigmatic/Machine.pm | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/lib/Enigmatic/Machine.pm b/lib/Enigmatic/Machine.pm index f5d5081..cc736e0 100644 --- a/lib/Enigmatic/Machine.pm +++ b/lib/Enigmatic/Machine.pm @@ -55,23 +55,10 @@ sub map { { isa => Letter }, ); -warn "mapping $letter\n"; -warn " initial positions: @{[ $self->train->positions ]}\n"; - $letter = $self->plugboard->map($letter); - -warn " after plugboard: $letter\n"; - $letter = $self->train->map($letter); - -warn " after rotors: $letter\n"; - $letter = $self->plugboard->map($letter); -warn " after plugboard: $letter\n"; - -warn " new positions: @{[ $self->train->positions ]}\n"; - return $letter; } |