Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!KLEPH.AI.MIT.EDU!cph
From: cph@KLEPH.AI.MIT.EDU (Chris Hanson)
Newsgroups: gnu.emacs.bug
Subject: correction to HP-UX patches
Message-ID: <8905051918.AA06346@kleph>
Date: 5 May 89 19:18:26 GMT
Sender: daemon@tut.cis.ohio-state.edu
Reply-To: cph@zurich.ai.mit.edu
Distribution: gnu
Organization: GNUs Not Usenet
Lines: 38

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);