diff options
author | Jay Rogers <jay@rgrs.com> | 1997-07-31 13:11:29 +1200 |
---|---|---|
committer | Tim Bunce <Tim.Bunce@ig.co.uk> | 1997-08-07 00:00:00 +1200 |
commit | 96774cc9e0d4678381758886734d521b879a91fd (patch) | |
tree | 380f2d461986b635df0ef41c58860247e74c2924 /lib/perl5db.pl | |
parent | 4e2a63a79975e6f132b1e2902946589b4ad25bb6 (diff) | |
download | perl-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
Diffstat (limited to 'lib/perl5db.pl')
-rw-r--r-- | lib/perl5db.pl | 4 |
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; |