develooper Front page | perl.perl5.porters | Postings from March 2000

RE: [PATCH 5.6.0-RC2] noTTY (was RE: [5.6.0-RC2] Debugger problem )

From:
paul.marquess
Date:
March 17, 2000 13:14
Subject:
RE: [PATCH 5.6.0-RC2] noTTY (was RE: [5.6.0-RC2] Debugger problem )
Message ID:
5104D4DBC598D211B5FE0000F8FE7EB206C19C4A@mbtlipnt02.btlabs.bt.co.uk
From: Tom Christiansen [mailto:tchrist@chthon.perl.com]
 
> >Here is a patch that makes "TTY" and "noTTY" booleans.
> 
> Ah, but the former is not.  :-(  It's string-valued:
> 
>        `TTY'       The TTY to use for debugging I/O.
> 
> but its negator is Boolean:
> 
>        `noTTY'     If set, goes in `NonStop' mode,
> 		   and would not connect to a TTY.
> 
> Wacky, eh?  You'd think one should set TTY to '' to 
> achieve noTTY.  
 
Ouch!

*** perl5db.pl.orig	Fri Mar 17 11:06:37 2000
--- perl5db.pl	Fri Mar 17 21:04:35 2000
***************
*** 1828,1834 ****
      # too dangerous to let intuitive usage overwrite important things
      # defaultion should never be the default
      my %opt_needs_val = map { ( $_ => 1 ) } qw{
!         arrayDepth hashDepth LineInfo maxTraceLen noTTY ornaments
          pager quote ReadLine recallCommand RemotePort ShellBang TTY
      };
      while (length) {
--- 1828,1834 ----
      # too dangerous to let intuitive usage overwrite important things
      # defaultion should never be the default
      my %opt_needs_val = map { ( $_ => 1 ) } qw{
!         arrayDepth hashDepth LineInfo maxTraceLen ornaments
          pager quote ReadLine recallCommand RemotePort ShellBang TTY
      };
      while (length) {



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About