Mercurial > hg > xemacs-beta

comparison src/eval.c @ 733:b1f74adcc1ff

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-01-22 20:40:00 by janv] Fix disabled-command-hook
author janv
date Tue, 22 Jan 2002 20:40:03 +0000
parents fdefd0186b75
children 943eaba38521
comparison
equal deleted inserted replaced
732:b9b8621c2439 733:b1f74adcc1ff
2892 con->prefix_arg = Qnil; 2892 con->prefix_arg = Qnil;
2893 Vcurrent_prefix_arg = prefixarg; 2893 Vcurrent_prefix_arg = prefixarg;
2894 debug_on_next_call = 0; /* #### from FSFmacs; correct? */ 2894 debug_on_next_call = 0; /* #### from FSFmacs; correct? */
2895 2895
2896 if (SYMBOLP (cmd) && !NILP (Fget (cmd, Qdisabled, Qnil))) 2896 if (SYMBOLP (cmd) && !NILP (Fget (cmd, Qdisabled, Qnil)))
2897 return run_hook (Vdisabled_command_hook); 2897 return run_hook (Qdisabled_command_hook);
2898 2898
2899 for (;;) 2899 for (;;)
2900 { 2900 {
2901 final = indirect_function (cmd, 1); 2901 final = indirect_function (cmd, 1);
2902 if (CONSP (final) && EQ (Fcar (final), Qautoload)) 2902 if (CONSP (final) && EQ (Fcar (final), Qautoload))