diff options
| author | Sven Strickroth <sven.strickroth@tu-clausthal.de> | 2012-11-25 08:44:02 -0600 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2012-11-25 10:05:56 -0600 |
| commit | 0a616d17c63ccea3e07a9370becf1d236ce89558 (patch) | |
| tree | 2b746f8e672637dfef97ae4eb0f701d7b5e1b21b /dist/Term-ReadLine | |
| parent | 6c864ec2ac9f9d9be7636d00f6c73b0fe89025b8 (diff) | |
| download | perl-0a616d17c63ccea3e07a9370becf1d236ce89558.tar.gz | |
(msys) perl readline creates sys$command files w/o STDIN connected
This fixes [perl #115900].
Diffstat (limited to 'dist/Term-ReadLine')
| -rw-r--r-- | dist/Term-ReadLine/lib/Term/ReadLine.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dist/Term-ReadLine/lib/Term/ReadLine.pm b/dist/Term-ReadLine/lib/Term/ReadLine.pm index 9d176d7f7b..6f94981305 100644 --- a/dist/Term-ReadLine/lib/Term/ReadLine.pm +++ b/dist/Term-ReadLine/lib/Term/ReadLine.pm @@ -235,7 +235,7 @@ sub findConsole { if (-e "/dev/tty" and $^O ne 'MSWin32') { $console = "/dev/tty"; - } elsif (-e "con" or $^O eq 'MSWin32') { + } elsif (-e "con" or $^O eq 'MSWin32' or $^O eq 'msys') { $console = 'CONIN$'; $consoleOUT = 'CONOUT$'; } else { |