[gnu.emacs.bug] correction to HP-UX patches

cph@KLEPH.AI.MIT.EDU (Chris Hanson) (05/06/89)

Here is a correction to the HP-UX 6.5 patches I reported earlier
today.


*** /zurich/gnu/fsf/dist/emacs-18.53/src/process.c	Sat Aug 20 13:27:41 1988
--- process.c	Fri May  5 14:58:07 1989
***************
*** 45,50 ****
--- 45,53 ----
  #ifdef USG
  #include <termio.h>
  #include <fcntl.h>
+ #if defined(HPUX) && !defined(NOMULTIPLEJOBS)
+ #include <bsdtty.h>
+ #endif
  #endif /* USG */
  
  #ifdef IRIS
***************
*** 1012,1017 ****
--- 1015,1031 ----
  	      abort ();
  #endif /* not UNIPLUS and not RTU */
  	  }
+ #else /* TIOCNOTTY */
+ #ifdef HPUX
+ 	/* HP-UX doesn't have TIOCNOTTY, but it must create a new
+ 	   process group and associate the PTY with it. */
+ 	if (ptyname)
+ 	  {
+ 	    close (xforkin);
+ 	    setpgrp ();
+ 	    xforkout = xforkin = open (ptyname, O_RDWR, 0);
+ 	  }
+ #endif /* HPUX */
  #endif /* TIOCNOTTY */
  #endif /* HAVE_PTYS */
  	child_setup_tty (xforkout);