diff options
author | Jesse Luehrs <doy@tozt.net> | 2013-08-29 09:52:35 -0400 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2013-08-29 09:52:35 -0400 |
commit | 242a39254f4a3fc81550ddc1f7a79eef5e33011d (patch) | |
tree | 24981f7504797d85db445d354c1b0e44c38ad8ad /lib/Reply/Plugin | |
parent | f2297eebc71791ffde359a3d9ddb2bf48dad34f3 (diff) | |
download | reply-242a39254f4a3fc81550ddc1f7a79eef5e33011d.tar.gz reply-242a39254f4a3fc81550ddc1f7a79eef5e33011d.zip |
explicitly read from STDIN (lestrrat, fixes #26)
<> has magic @ARGV behavior
Diffstat (limited to 'lib/Reply/Plugin')
-rw-r--r-- | lib/Reply/Plugin/Defaults.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Reply/Plugin/Defaults.pm b/lib/Reply/Plugin/Defaults.pm index d2acfbc..e7874e3 100644 --- a/lib/Reply/Plugin/Defaults.pm +++ b/lib/Reply/Plugin/Defaults.pm @@ -31,7 +31,7 @@ sub read_line { my ($next, $prompt) = @_; print $prompt; - return scalar <>; + return scalar <STDIN>; } (my $PREFIX = <<'PREFIX') =~ s/__PACKAGE__/__PACKAGE__/ge; |