Mercurial > emacs
annotate src/acldef.h @ 83425:c82829d08b89
Fix semantics of let-binding `process-environment'.
* lisp/env.el: Require cl for byte compilation. (For `block' and `return'.)
(read-envvar-name): Update for rename. Include `process-environment'
as well.
(setenv): Update for rename also handle `process-environment'. Update doc.
(getenv): Update doc.
(environment): New function.
(let-environment): New macro.
* lisp/font-lock.el (lisp-font-lock-keywords-2): Add `let-environment'.
* src/callproc.c (Vglobal_environment): New variable, taking over the
previous role of `Vprocess_environment', which is now something else.
(add_env): New function.
(child_setup): Use it.
(child_setup, getenv_internal): Rename Vprocess_environment to
Vglobal_environment. Handle the new Vprocess_environment.
(Fgetenv_internal, egetenv): Update doc.
(set_process_environment): Rename to `set_global_environment'. Rename
Vprocess_environment to Vglobal_environment.
(syms_of_callproc): Rename process-environment to global-environment,
add new process-environment, update docs.
* src/emacs.c (main): Call set_global_environment instead of
set_process_environment.
* fileio.c (Fread_file_name): Update comment.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-465
| author | Karoly Lorentey <lorentey@elte.hu> |
|---|---|
| date | Thu, 29 Dec 2005 01:28:33 +0000 |
| parents | 695cf19ef79e |
| children | 9511dc88835c 375f2633d815 |
| rev | line source |
|---|---|
| 484 | 1 #define ACL$K_LENGTH 12 |
| 2 #define ACL$C_LENGTH 12 | |
| 3 #define ACL$C_FILE 1 | |
| 4 #define ACL$C_DEVICE 2 | |
| 5 #define ACL$C_JOBCTL_QUEUE 3 | |
| 6 #define ACL$C_COMMON_EF_CLUSTER 4 | |
| 7 #define ACL$C_LOGICAL_NAME_TABLE 5 | |
| 8 #define ACL$C_PROCESS 6 | |
| 9 #define ACL$C_GROUP_GLOBAL_SECTION 7 | |
| 10 #define ACL$C_SYSTEM_GLOBAL_SECTION 8 | |
| 11 #define ACL$C_ADDACLENT 1 | |
| 12 #define ACL$C_DELACLENT 2 | |
| 13 #define ACL$C_MODACLENT 3 | |
| 14 #define ACL$C_FNDACLENT 4 | |
| 15 #define ACL$C_FNDACETYP 5 | |
| 16 #define ACL$C_DELETEACL 6 | |
| 17 #define ACL$C_READACL 7 | |
| 18 #define ACL$C_ACLLENGTH 8 | |
| 19 #define ACL$C_READACE 9 | |
| 20 #define ACL$C_RLOCK_ACL 10 | |
| 21 #define ACL$C_WLOCK_ACL 11 | |
| 22 #define ACL$C_UNLOCK_ACL 12 | |
| 23 #define ACL$S_ADDACLENT 255 | |
| 24 #define ACL$S_DELACLENT 255 | |
| 25 #define ACL$S_MODACLENT 255 | |
| 26 #define ACL$S_FNDACLENT 255 | |
| 27 #define ACL$S_FNDACETYP 255 | |
| 28 #define ACL$S_DELETEACL 255 | |
| 29 #define ACL$S_READACL 512 | |
| 30 #define ACL$S_ACLLENGTH 4 | |
| 31 #define ACL$S_READACE 255 | |
| 32 #define ACL$S_RLOCK_ACL 4 | |
| 33 #define ACL$S_WLOCK_ACL 4 | |
| 34 #define ACL$S_UNLOCK_ACL 4 | |
| 35 #define ACL$S_ACLDEF 16 | |
| 36 #define ACL$L_FLINK 0 | |
| 37 #define ACL$L_BLINK 4 | |
| 38 #define ACL$W_SIZE 8 | |
| 39 #define ACL$B_TYPE 10 | |
| 40 #define ACL$L_LIST 12 | |
| 52401 | 41 |
| 42 /* arch-tag: 7c11e99d-34df-41e8-98e2-20f152c4ad73 | |
| 43 (do not change this comment) */ |