Mercurial > emacs
comparison src/callproc.c @ 5179:2a1492764d5e
(child_setup): Test SETPGRP_RELEASES_CTTY, not IRIX.
(init_callproc): Fix previous change.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 25 Nov 1993 21:33:31 +0000 |
parents | e4e66bcaa016 |
children | 480731ff8e9a |
comparison
equal
deleted
inserted
replaced
5178:e2ebd4e12279 | 5179:2a1492764d5e |
---|---|
522 dup2 (err, 2); | 522 dup2 (err, 2); |
523 close (in); | 523 close (in); |
524 close (out); | 524 close (out); |
525 close (err); | 525 close (err); |
526 | 526 |
527 #if !defined (IRIX) | 527 #ifdef USG |
528 #if defined (USG) | 528 #ifndef SETPGRP_RELEASES_CTTY |
529 setpgrp (); /* No arguments but equivalent in this case */ | 529 setpgrp (); /* No arguments but equivalent in this case */ |
530 #endif | |
530 #else | 531 #else |
531 setpgrp (pid, pid); | 532 setpgrp (pid, pid); |
532 #endif /* USG */ | 533 #endif /* USG */ |
533 #endif /* IRIX */ | |
534 setpgrp_of_tty (pid); | 534 setpgrp_of_tty (pid); |
535 | 535 |
536 #ifdef vipc | 536 #ifdef vipc |
537 something missing here; | 537 something missing here; |
538 #endif /* vipc */ | 538 #endif /* vipc */ |
684 Lisp_Object tem, tem2, tem3; | 684 Lisp_Object tem, tem2, tem3; |
685 tem = Fexpand_file_name (build_string ("../etc"), | 685 tem = Fexpand_file_name (build_string ("../etc"), |
686 Vinvocation_directory); | 686 Vinvocation_directory); |
687 tem2 = Fexpand_file_name (Vdoc_file_name, tem); | 687 tem2 = Fexpand_file_name (Vdoc_file_name, tem); |
688 tem3 = Ffile_exists_p (tem2); | 688 tem3 = Ffile_exists_p (tem2); |
689 if (!NILP (tem2)) | 689 if (!NILP (tem3)) |
690 Vdata_directory = tem; | 690 Vdata_directory = Ffile_name_as_directory (tem); |
691 } | 691 } |
692 } | 692 } |
693 } | 693 } |
694 | 694 |
695 tempdir = Fdirectory_file_name (Vexec_directory); | 695 tempdir = Fdirectory_file_name (Vexec_directory); |