diff options
| author | Charles A. Roelli | 2018-04-02 16:18:23 +0200 |
|---|---|---|
| committer | Charles A. Roelli | 2018-04-02 16:19:59 +0200 |
| commit | d06c2e7a666fbc7aa0e7a9b134d9e373431d76bf (patch) | |
| tree | 2475e252f35e7e6272cc2b888c04e42733042e39 /src | |
| parent | b393ecf8e288f1e1b6a8ac55006715fa1046a5d4 (diff) | |
| download | emacs-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.c | 6 |
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); |