Mercurial > emacs
comparison src/lread.c @ 55139:2b5be9da52c2
lread.c (init_lread): Don't display missing lisp directory
warnings with Carbon Emacs because self-contained bundled Emacs
may be build without correct installation path.
author | Steven Tamm <steventamm@mac.com> |
---|---|
date | Sun, 25 Apr 2004 21:07:58 +0000 |
parents | 78f37e5ea2f2 |
children | f78c7b75f616 |
comparison
equal
deleted
inserted
replaced
55138:5d9c0626b44c | 55139:2b5be9da52c2 |
---|---|
3674 Vload_path = decode_env_path (0, normal); | 3674 Vload_path = decode_env_path (0, normal); |
3675 dump_path = Vload_path; | 3675 dump_path = Vload_path; |
3676 } | 3676 } |
3677 #endif | 3677 #endif |
3678 | 3678 |
3679 #ifndef WINDOWSNT | 3679 #if (!(defined(WINDOWSNT) && (defined(HAVE_CARBON)) )) |
3680 /* When Emacs is invoked over network shares on NT, PATH_LOADSEARCH is | 3680 /* When Emacs is invoked over network shares on NT, PATH_LOADSEARCH is |
3681 almost never correct, thereby causing a warning to be printed out that | 3681 almost never correct, thereby causing a warning to be printed out that |
3682 confuses users. Since PATH_LOADSEARCH is always overridden by the | 3682 confuses users. Since PATH_LOADSEARCH is always overridden by the |
3683 EMACSLOADPATH environment variable below, disable the warning on NT. */ | 3683 EMACSLOADPATH environment variable below, disable the warning on NT. |
3684 Also, when using the "self-contained" option for Carbon Emacs for MacOSX, | |
3685 the "standard" paths may not exist and would be overridden by | |
3686 EMACSLOADPATH as on NT. Since this depends on how the executable | |
3687 was build and packaged, turn off the warnings in general */ | |
3684 | 3688 |
3685 /* Warn if dirs in the *standard* path don't exist. */ | 3689 /* Warn if dirs in the *standard* path don't exist. */ |
3686 if (!turn_off_warning) | 3690 if (!turn_off_warning) |
3687 { | 3691 { |
3688 Lisp_Object path_tail; | 3692 Lisp_Object path_tail; |
3700 dir_warning ("Warning: Lisp directory `%s' does not exist.\n", | 3704 dir_warning ("Warning: Lisp directory `%s' does not exist.\n", |
3701 XCAR (path_tail)); | 3705 XCAR (path_tail)); |
3702 } | 3706 } |
3703 } | 3707 } |
3704 } | 3708 } |
3705 #endif /* WINDOWSNT */ | 3709 #endif /* WINDOWSNT && HAVE_CARBON*/ |
3706 | 3710 |
3707 /* If the EMACSLOADPATH environment variable is set, use its value. | 3711 /* If the EMACSLOADPATH environment variable is set, use its value. |
3708 This doesn't apply if we're dumping. */ | 3712 This doesn't apply if we're dumping. */ |
3709 #ifndef CANNOT_DUMP | 3713 #ifndef CANNOT_DUMP |
3710 if (NILP (Vpurify_flag) | 3714 if (NILP (Vpurify_flag) |