Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

[bin/crypt] add reveal message

  • Loading branch information...
commit afd7967d5792f7fae0e3705594bf4198e98ea525 1 parent 37e0d35
Carl Mäsak authored July 17, 2012

Showing 1 changed file with 4 additions and 0 deletions. Show diff stats Hide diff stats

  1. 4  bin/crypt
4  bin/crypt
@@ -962,6 +962,10 @@ multi MAIN() {
962 962
                         }
963 963
                     }
964 964
                     when Adventure::PlayerExamined { say %descriptions{.thing} }
  965
+                    when Adventure::ContentsRevealed {
  966
+                        my $contents = join " and ", map { "a $_" }, .contents;
  967
+                        say "Opening the {.container} reveals $contents.";
  968
+                    }
965 969
                 }
966 970
                 CATCH {
967 971
                     when X::Adventure { say .message, '.' }

0 notes on commit afd7967

Please sign in to comment.
Something went wrong with that request. Please try again.