diff options
| author | Richard M. Stallman | 1996-09-23 04:31:38 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-09-23 04:31:38 +0000 |
| commit | 6e6e9f0840ab3169f68cd9f5d695ca3ee564853c (patch) | |
| tree | 84324952b66f68a4ef50ddfb5acbe77825119f17 /src | |
| parent | 97a74ef613a91d7ab0d866d8892d6262a9b77eb2 (diff) | |
| download | emacs-6e6e9f0840ab3169f68cd9f5d695ca3ee564853c.tar.gz emacs-6e6e9f0840ab3169f68cd9f5d695ca3ee564853c.zip | |
(syms_of_eval): Initialize Vrun_hooks here.
Don't make it a Lisp variable.
Diffstat (limited to 'src')
| -rw-r--r-- | src/eval.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/src/eval.c b/src/eval.c index 535c377965b..4f66f44fb40 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -90,6 +90,9 @@ Lisp_Object Qmocklisp_arguments, Vmocklisp_arguments, Qmocklisp; | |||
| 90 | Lisp_Object Qand_rest, Qand_optional; | 90 | Lisp_Object Qand_rest, Qand_optional; |
| 91 | Lisp_Object Qdebug_on_error; | 91 | Lisp_Object Qdebug_on_error; |
| 92 | 92 | ||
| 93 | /* This holds either the symbol `run-hooks' or nil. | ||
| 94 | It is nil at an early stage of startup, and when Emacs | ||
| 95 | is shutting down. */ | ||
| 93 | Lisp_Object Vrun_hooks; | 96 | Lisp_Object Vrun_hooks; |
| 94 | 97 | ||
| 95 | /* Non-nil means record all fset's and provide's, to be undone | 98 | /* Non-nil means record all fset's and provide's, to be undone |
| @@ -2926,9 +2929,8 @@ If due to `eval' entry, one arg, t."); | |||
| 2926 | "While in a mocklisp function, the list of its unevaluated args."); | 2929 | "While in a mocklisp function, the list of its unevaluated args."); |
| 2927 | Vmocklisp_arguments = Qt; | 2930 | Vmocklisp_arguments = Qt; |
| 2928 | 2931 | ||
| 2929 | DEFVAR_LISP ("run-hooks", &Vrun_hooks, | 2932 | Vrun_hooks = intern ("run-hooks"); |
| 2930 | "Set to the function `run-hooks', if that function has been defined.\n\ | 2933 | staticpro (&Vrun_hooks); |
| 2931 | Otherwise, nil (in a bare Emacs without preloaded Lisp code)."); | ||
| 2932 | 2934 | ||
| 2933 | staticpro (&Vautoload_queue); | 2935 | staticpro (&Vautoload_queue); |
| 2934 | Vautoload_queue = Qnil; | 2936 | Vautoload_queue = Qnil; |