Mercurial > emacs

comparison src/emacs.c @ 7788:ddcb81020fa1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(main): Do the setpgrp after checking for -batch.
author Richard M. Stallman <rms@gnu.org>
date Sun, 05 Jun 1994 11:31:25 +0000
parents a5dabfde673c
children 3b27d2451f83
comparison
equal deleted inserted replaced
7787:add6e866d6a2 7788:ddcb81020fa1
406 if (bss_end) 406 if (bss_end)
407 brk (bss_end); 407 brk (bss_end);
408 #endif 408 #endif
409 409
410 clearerr (stdin); 410 clearerr (stdin);
411
412 if (! noninteractive1)
413 {
414 #ifdef BSD_PGRPS
415 if (initialized)
416 {
417 inherited_pgroup = EMACS_GETPGRP (0);
418 setpgrp (0, getpid ());
419 }
420 #else
421 #if defined (USG5) && defined (INTERRUPT_INPUT)
422 setpgrp ();
423 #endif
424 #endif
425 }
426 411
427 #ifdef APOLLO 412 #ifdef APOLLO
428 #ifndef APOLLO_SR10 413 #ifndef APOLLO_SR10
429 /* If USE_DOMAIN_ACLS environment variable exists, 414 /* If USE_DOMAIN_ACLS environment variable exists,
430 use ACLs rather than UNIX modes. */ 415 use ACLs rather than UNIX modes. */
503 noninteractive = 0; 488 noninteractive = 0;
504 if (skip_args + 1 < argc && !strcmp (argv[skip_args + 1], "-batch")) 489 if (skip_args + 1 < argc && !strcmp (argv[skip_args + 1], "-batch"))
505 { 490 {
506 skip_args += 1; 491 skip_args += 1;
507 noninteractive = 1; 492 noninteractive = 1;
493 }
494
495 if (! noninteractive)
496 {
497 #ifdef BSD_PGRPS
498 if (initialized)
499 {
500 inherited_pgroup = EMACS_GETPGRP (0);
501 setpgrp (0, getpid ());
502 }
503 #else
504 #if defined (USG5) && defined (INTERRUPT_INPUT)
505 setpgrp ();
506 #endif
507 #endif
508 } 508 }
509 509
510 #ifdef POSIX_SIGNALS 510 #ifdef POSIX_SIGNALS
511 init_signals (); 511 init_signals ();
512 #endif 512 #endif