Mercurial > emacs
comparison src/callint.c @ 10653:8178d81bdebd
(syms_of_callint): Move DEFVAR_DISPLAY's to keyboard.c.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Sat, 04 Feb 1995 00:31:13 +0000 |
parents | dde12d0f02b7 |
children | f0cd1c0ac565 |
comparison
equal
deleted
inserted
replaced
10652:f6a41cb94a75 | 10653:8178d81bdebd |
---|---|
653 staticpro (&Qenable_recursive_minibuffers); | 653 staticpro (&Qenable_recursive_minibuffers); |
654 | 654 |
655 Qmouse_leave_buffer_hook = intern ("mouse-leave-buffer-hook"); | 655 Qmouse_leave_buffer_hook = intern ("mouse-leave-buffer-hook"); |
656 staticpro (&Qmouse_leave_buffer_hook); | 656 staticpro (&Qmouse_leave_buffer_hook); |
657 | 657 |
658 DEFVAR_DISPLAY ("prefix-arg", Vprefix_arg, | |
659 "The value of the prefix argument for the next editing command.\n\ | |
660 It may be a number, or the symbol `-' for just a minus sign as arg,\n\ | |
661 or a list whose car is a number for just one or more C-U's\n\ | |
662 or nil if no argument has been specified.\n\ | |
663 \n\ | |
664 You cannot examine this variable to find the argument for this command\n\ | |
665 since it has been set to nil by the time you can look.\n\ | |
666 Instead, you should use the variable `current-prefix-arg', although\n\ | |
667 normally commands can get this prefix argument with (interactive \"P\")."); | |
668 the_only_perdisplay.Vprefix_arg = Qnil; | |
669 | |
670 DEFVAR_DISPLAY ("current-prefix-arg", Vcurrent_prefix_arg, | |
671 "The value of the prefix argument for this editing command.\n\ | |
672 It may be a number, or the symbol `-' for just a minus sign as arg,\n\ | |
673 or a list whose car is a number for just one or more C-U's\n\ | |
674 or nil if no argument has been specified.\n\ | |
675 This is what `(interactive \"P\")' returns."); | |
676 the_only_perdisplay.Vcurrent_prefix_arg = Qnil; | |
677 | |
678 DEFVAR_LISP ("command-history", &Vcommand_history, | 658 DEFVAR_LISP ("command-history", &Vcommand_history, |
679 "List of recent commands that read arguments from terminal.\n\ | 659 "List of recent commands that read arguments from terminal.\n\ |
680 Each command is represented as a form to evaluate."); | 660 Each command is represented as a form to evaluate."); |
681 Vcommand_history = Qnil; | 661 Vcommand_history = Qnil; |
682 | 662 |