aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorCharles A. Roelli2018-04-02 16:18:23 +0200
committerCharles A. Roelli2018-04-02 16:19:59 +0200
commitd06c2e7a666fbc7aa0e7a9b134d9e373431d76bf (patch)
tree2475e252f35e7e6272cc2b888c04e42733042e39 /src
parentb393ecf8e288f1e1b6a8ac55006715fa1046a5d4 (diff)
downloademacs-d06c2e7a666fbc7aa0e7a9b134d9e373431d76bf.tar.gz
emacs-d06c2e7a666fbc7aa0e7a9b134d9e373431d76bf.zip
Add a history variable for `read-variable'
* src/minibuf.c (Fread_variable): Use the history variable when calling Fcompleting_read. (syms_of_minibuf): New history variable, custom-variable-history.
Diffstat (limited to 'src')
-rw-r--r--src/minibuf.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/minibuf.c b/src/minibuf.c
index 45cf15224a5..5cb6919a0f5 100644
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -1090,7 +1090,8 @@ A user option, or customizable variable, is one for which
1090 1090
1091 name = Fcompleting_read (prompt, Vobarray, 1091 name = Fcompleting_read (prompt, Vobarray,
1092 Qcustom_variable_p, Qt, 1092 Qcustom_variable_p, Qt,
1093 Qnil, Qnil, default_string, Qnil); 1093 Qnil, Qcustom_variable_history,
1094 default_string, Qnil);
1094 if (NILP (name)) 1095 if (NILP (name))
1095 return name; 1096 return name;
1096 return Fintern (name, Qnil); 1097 return Fintern (name, Qnil);
@@ -1931,6 +1932,9 @@ syms_of_minibuf (void)
1931 staticpro (&last_minibuf_string); 1932 staticpro (&last_minibuf_string);
1932 last_minibuf_string = Qnil; 1933 last_minibuf_string = Qnil;
1933 1934
1935 DEFSYM (Qcustom_variable_history, "custom-variable-history");
1936 Fset (Qcustom_variable_history, Qnil);
1937
1934 DEFSYM (Qminibuffer_history, "minibuffer-history"); 1938 DEFSYM (Qminibuffer_history, "minibuffer-history");
1935 DEFSYM (Qbuffer_name_history, "buffer-name-history"); 1939 DEFSYM (Qbuffer_name_history, "buffer-name-history");
1936 Fset (Qbuffer_name_history, Qnil); 1940 Fset (Qbuffer_name_history, Qnil);