andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Give read-expression-history a doc.

Browse source 
* lisp/simple.el (read-expression-history): Remove, it's in minibuf.c.

* src/minibuf.c (syms_of_minibuf) <read-expression-history>:
Give it a doc string.
* src/globals.h: Add Vread_expression_history.
This commit is contained in:
Glenn Morris 2011-01-19 22:40:36 -08:00
parent bb1c666333
commit c11136ec3e
5 changed files with 21 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ChangeLog
View file

@ -1,3 +1,7 @@
2011-01-20 Glenn Morris <rgm@gnu.org>
* simple.el (read-expression-history): Remove, it's in minibuf.c.
2011-01-20 Chong Yidong <cyd@stupidchicken.com>
* subr.el (y-or-n-p): Revert 2011-01-07 change, removing ARGS.

2
lisp/simple.el
View file

@ -1142,8 +1142,6 @@ in *Help* buffer. See also the command `describe-char'."
(set-keymap-parent m minibuffer-local-map)
(setq read-expression-map m))
(defvar read-expression-history nil)
(defvar minibuffer-completing-symbol nil
"Non-nil means completing a Lisp symbol in the minibuffer.")

4
src/ChangeLog
View file

@ -1,5 +1,9 @@
2011-01-20 Glenn Morris <rgm@gnu.org>
* minibuf.c (syms_of_minibuf) <read-expression-history>:
Give it a doc string.
* globals.h: Add Vread_expression_history.
* macros.c (syms_of_macros) <kbd-macro-termination-hook>:
Give it a doc string.
* globals.h: Add Vkbd_macro_termination_hook.

4
src/globals.h
View file

@ -983,6 +983,8 @@ struct emacs_globals
Lisp_Object f_Vminibuffer_exit_hook;
Lisp_Object f_Vread_expression_history;
/* Function to call to read a buffer name. */
Lisp_Object f_Vread_buffer_function;
@ -2268,6 +2270,8 @@ extern struct emacs_globals globals;
globals.f_Vquit_flag
#define Vread_buffer_function \
globals.f_Vread_buffer_function
#define Vread_expression_history \
globals.f_Vread_expression_history
#define Vread_circle \
globals.f_Vread_circle
#define Vread_expression_map \

12
src/minibuf.c
View file

@ -1,7 +1,8 @@
/* Minibuffer input and completion.
Copyright (C) 1985, 1986, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
2008, 2009, 2010, 2011 Free Software Foundation, Inc.
Copyright (C) 1985, 1986, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010,
2011 Free Software Foundation, Inc.
This file is part of GNU Emacs.
@ -2016,6 +2017,11 @@ syms_of_minibuf (void)
Qcase_fold_search = intern_c_string ("case-fold-search");
staticpro (&Qcase_fold_search);
DEFVAR_LISP ("read-expression-history", Vread_expression_history,
doc: /* A history list for arguments that are Lisp expressions to evaluate.
For example, `eval-expression' uses this. */);
Vread_expression_history = Qnil;
Qread_expression_history = intern_c_string ("read-expression-history");
staticpro (&Qread_expression_history);