Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Type name changed to bare words, as they should be.

  • Loading branch information...
commit 2ce9b12bbafc2a460a40692a5e11e6c7cacc647b 1 parent deb7b89
Panu Ervamaa authored
Showing with 8 additions and 8 deletions.
  1. +8 −8 lib/IO/Prompt.pm
View
16 lib/IO/Prompt.pm
@@ -34,16 +34,16 @@ method ask ( Str $message=$!message,
my $r = do {
given $type {
- when .^isa('Bool') { self.ask_yn( |$args ); }
- when .^isa('Int') { self.ask_int( |$args ); }
- when .^isa('Num') { self.ask_num( |$args ); }
- when .^isa('Str') { self.ask_str( |$args ); }
+ when .^isa(Bool) { self.ask_yn( |$args ); }
+ when .^isa(Int) { self.ask_int( |$args ); }
+ when .^isa(Num) { self.ask_num( |$args ); }
+ when .^isa(Str) { self.ask_str( |$args ); }
default {
given $default {
- when .^isa('Bool') { self.ask_yn( |$args ); }
- when .^isa('Int') { self.ask_int( |$args ); }
- when .^isa('Num') { self.ask_num( |$args ); }
- when .^isa('Str') { self.ask_str( |$args ); }
+ when .^isa(Bool) { self.ask_yn( |$args ); }
+ when .^isa(Int) { self.ask_int( |$args ); }
+ when .^isa(Num) { self.ask_num( |$args ); }
+ when .^isa(Str) { self.ask_str( |$args ); }
default { self.ask_str( |$args ); }
} # given $default
} # given $type default
Please sign in to comment.
Something went wrong with that request. Please try again.