Mercurial > hg > xemacs-beta
comparison src/cmdloop.c @ 733:b1f74adcc1ff
[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 | 183866b06e0b |
children | 943eaba38521 |
comparison
equal
deleted
inserted
replaced
732:b9b8621c2439 | 733:b1f74adcc1ff |
---|---|
47 /* Function to call to evaluate to read and process events. */ | 47 /* Function to call to evaluate to read and process events. */ |
48 Lisp_Object Vcommand_loop; | 48 Lisp_Object Vcommand_loop; |
49 #endif /* LISP_COMMAND_LOOP */ | 49 #endif /* LISP_COMMAND_LOOP */ |
50 | 50 |
51 Lisp_Object Venter_window_hook, Vleave_window_hook; | 51 Lisp_Object Venter_window_hook, Vleave_window_hook; |
52 | |
53 Lisp_Object Qdisabled_command_hook, Vdisabled_command_hook; | |
52 | 54 |
53 /* The error handler. */ | 55 /* The error handler. */ |
54 Lisp_Object Qcommand_error; | 56 Lisp_Object Qcommand_error; |
55 | 57 |
56 /* The emergency error handler, before we're ready. */ | 58 /* The emergency error handler, before we're ready. */ |
604 /**********************************************************************/ | 606 /**********************************************************************/ |
605 | 607 |
606 void | 608 void |
607 syms_of_cmdloop (void) | 609 syms_of_cmdloop (void) |
608 { | 610 { |
611 DEFSYMBOL (Qdisabled_command_hook); | |
609 DEFSYMBOL (Qcommand_error); | 612 DEFSYMBOL (Qcommand_error); |
610 DEFSYMBOL (Qreally_early_error_handler); | 613 DEFSYMBOL (Qreally_early_error_handler); |
611 DEFSYMBOL (Qtop_level); | 614 DEFSYMBOL (Qtop_level); |
612 DEFSYMBOL (Qerrors_deactivate_region); | 615 DEFSYMBOL (Qerrors_deactivate_region); |
613 | 616 |