diff options
author | Gurusamy Sarathy <gsar@engin.umich.edu> | 1997-04-10 17:42:13 -0400 |
---|---|---|
committer | Chip Salzenberg <chip@atlantic.net> | 1997-04-09 00:00:00 +0000 |
commit | 56cbacacb6c634a626b06407cbd555bc1519a2d5 (patch) | |
tree | 21e6d4e21ad0aec5b7d15e52e7c9ceae52192f2c | |
parent | fa85963645b525b23ccb5a91ab9199c740773c41 (diff) | |
download | perl-56cbacacb6c634a626b06407cbd555bc1519a2d5.tar.gz |
win32: perl5db patch
The debugger doesn't work on win32 without this patch.
(You'd think C<-e> will work on pseudo devices like "CON",
but the _stat() in the C runtime doesn't cooperate).
p5p-msgid: 199704102142.RAA27396@aatma.engin.umich.edu
-rw-r--r-- | lib/perl5db.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/perl5db.pl b/lib/perl5db.pl index 9718fede67..f38c3ffd3e 100644 --- a/lib/perl5db.pl +++ b/lib/perl5db.pl @@ -285,7 +285,7 @@ if ($notty) { if (-e "/dev/tty") { $console = "/dev/tty"; - } elsif (-e "con") { + } elsif (-e "con" or $^O eq 'MSWin32') { $console = "con"; } else { $console = "sys\$command"; |