From: Gurusamy Sarathy <gsar@engin.umich.edu>
Date: Wed, 11 Jun 1997 00:00:00 +0000 (+1200)
Subject: Re: Term::ReadKey on Win32: set console
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8878e8698834a878cac8b55dceba0d0e1ec03745;p=p5sagit%2Fp5-mst-13.2.git

Re: Term::ReadKey on Win32: set console
---

diff --git a/lib/Term/ReadLine.pm b/lib/Term/ReadLine.pm
index a52b558..105e6dd 100644
--- a/lib/Term/ReadLine.pm
+++ b/lib/Term/ReadLine.pm
@@ -157,7 +157,7 @@ sub findConsole {
 
     if (-e "/dev/tty") {
 	$console = "/dev/tty";
-    } elsif (-e "con") {
+    } elsif (-e "con" or $^O eq 'MSWin32') {
 	$console = "con";
     } else {
 	$console = "sys\$command";