Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[bin/crypt] tells you when you've won

  • Loading branch information...
commit ed7110e4517169d40acd99933f78e9c6ae4871da 1 parent baa9803
@masak authored
Showing with 4 additions and 0 deletions.
  1. +4 −0 bin/crypt
View
4 bin/crypt
@@ -330,6 +330,10 @@ multi MAIN('hanoi') {
my @events = $game."$verb"(|@args);
push @all_events, @events;
print_board();
+ for @events {
+ when Hanoi::AchievementUnlocked { say "Achievement unlocked!" }
+ when Hanoi::AchievementLocked { say "Achievement locked!" }
+ }
CATCH {
when X::Hanoi { say .message }
}
Please sign in to comment.
Something went wrong with that request. Please try again.