summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJay Rogers <jay@rgrs.com>1997-07-31 13:11:29 +1200
committerTim Bunce <Tim.Bunce@ig.co.uk>1997-08-07 00:00:00 +1200
commit96774cc9e0d4678381758886734d521b879a91fd (patch)
tree380f2d461986b635df0ef41c58860247e74c2924
parent4e2a63a79975e6f132b1e2902946589b4ad25bb6 (diff)
downloadperl-96774cc9e0d4678381758886734d521b879a91fd.tar.gz
perl debugger, win32, and emacs
The following patch is necessary for the perl debugger to run under emacs on a win32 machine. The "or defined $ENV{EMACS}" is necessary for the debugger to run under emacs shell-mode as well. p5p-msgid: 199707311759.NAA13276@crooked-i.mitre.org
-rw-r--r--lib/perl5db.pl4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/perl5db.pl b/lib/perl5db.pl
index fbd36a0374..469ebff023 100644
--- a/lib/perl5db.pl
+++ b/lib/perl5db.pl
@@ -296,6 +296,10 @@ if ($notty) {
$console = "sys\$command";
}
+ if (($^O eq 'MSWin32') and ($emacs or defined $ENV{EMACS})) {
+ $console = undef;
+ }
+
# Around a bug:
if (defined $ENV{OS2_SHELL} and ($emacs or $ENV{WINDOWID})) { # In OS/2
$console = undef;