Mercurial > emacs
comparison src/emacs.c @ 105081:28ad66a103d9
(inhibit_x_resources): Update doc string for NS. (main) [HAVE_NS]: Don't process --no-init-file option. Remove legacy code for -NXHost.
author | Adrian Robert <Adrian.B.Robert@gmail.com> |
---|---|
date | Fri, 18 Sep 2009 15:11:38 +0000 |
parents | 4cbb223d0b1c |
children | 7d1a89cec51a |
comparison
equal
deleted
inserted
replaced
105080:37b8e423433c | 105081:28ad66a103d9 |
---|---|
198 #endif | 198 #endif |
199 | 199 |
200 #if defined(HAVE_X_WINDOWS) || defined(HAVE_NS) | 200 #if defined(HAVE_X_WINDOWS) || defined(HAVE_NS) |
201 /* If non-zero, -d was specified, meaning we're using some window system. */ | 201 /* If non-zero, -d was specified, meaning we're using some window system. */ |
202 int display_arg; | 202 int display_arg; |
203 #endif | |
204 | |
205 #ifdef HAVE_NS | |
206 extern char ns_no_defaults; | |
207 #endif | 203 #endif |
208 | 204 |
209 /* An address near the bottom of the stack. | 205 /* An address near the bottom of the stack. |
210 Tells GC how to save a copy of the stack. */ | 206 Tells GC how to save a copy of the stack. */ |
211 char *stack_bottom; | 207 char *stack_bottom; |
1477 | 1473 |
1478 #ifdef HAVE_NS | 1474 #ifdef HAVE_NS |
1479 ns_alloc_autorelease_pool(); | 1475 ns_alloc_autorelease_pool(); |
1480 if (!noninteractive) | 1476 if (!noninteractive) |
1481 { | 1477 { |
1482 char *tmp; | |
1483 display_arg = 4; | |
1484 if (argmatch (argv, argc, "-q", "--no-init-file", 6, NULL, &skip_args)) | |
1485 { | |
1486 ns_no_defaults = 1; | |
1487 skip_args--; | |
1488 } | |
1489 #ifdef NS_IMPL_COCOA | 1478 #ifdef NS_IMPL_COCOA |
1490 if (skip_args < argc) | 1479 if (skip_args < argc) |
1491 { | 1480 { |
1492 if (!strncmp(argv[skip_args], "-psn", 4)) | 1481 if (!strncmp(argv[skip_args], "-psn", 4)) |
1493 { | 1482 { |
1498 { | 1487 { |
1499 skip_args += 2; | 1488 skip_args += 2; |
1500 chdir (getenv ("HOME")); | 1489 chdir (getenv ("HOME")); |
1501 } | 1490 } |
1502 } | 1491 } |
1503 #endif | 1492 #endif /* COCOA */ |
1504 /* This used for remote operation.. not fully implemented yet. */ | |
1505 if (argmatch (argv, argc, "-_NSMachLaunch", 0, 3, &tmp, &skip_args)) | |
1506 display_arg = 4; | |
1507 else if (argmatch (argv, argc, "-MachLaunch", 0, 3, &tmp, &skip_args)) | |
1508 display_arg = 4; | |
1509 else if (argmatch (argv, argc, "-macosx", 0, 2, NULL, &skip_args)) | |
1510 display_arg = 4; | |
1511 else if (argmatch (argv, argc, "-NSHost", 0, 3, &tmp, &skip_args)) | |
1512 display_arg = 4; | |
1513 } | 1493 } |
1514 #endif /* HAVE_NS */ | 1494 #endif /* HAVE_NS */ |
1515 | 1495 |
1516 #ifdef HAVE_X_WINDOWS | 1496 #ifdef HAVE_X_WINDOWS |
1517 /* Stupid kludge to catch command-line display spec. We can't | 1497 /* Stupid kludge to catch command-line display spec. We can't |
2677 doc: /* Value of `current-time' after loading the init files. | 2657 doc: /* Value of `current-time' after loading the init files. |
2678 This is nil during initialization. */); | 2658 This is nil during initialization. */); |
2679 Vafter_init_time = Qnil; | 2659 Vafter_init_time = Qnil; |
2680 | 2660 |
2681 DEFVAR_BOOL ("inhibit-x-resources", &inhibit_x_resources, | 2661 DEFVAR_BOOL ("inhibit-x-resources", &inhibit_x_resources, |
2682 doc: /* If non-nil, X resources and Windows Registry settings are not used. */); | 2662 doc: /* If non-nil, X resources, Windows Registry settings, and NS defaults are not used. */); |
2683 inhibit_x_resources = 0; | 2663 inhibit_x_resources = 0; |
2684 | 2664 |
2685 /* Make sure IS_DAEMON starts up as false. */ | 2665 /* Make sure IS_DAEMON starts up as false. */ |
2686 daemon_pipe[1] = 0; | 2666 daemon_pipe[1] = 0; |
2687 } | 2667 } |