Mercurial > emacs
changeset 4775:69eba6f6d5fb
(read_minibuf): Don't add history item if it is
string-equal to the most recent history item.
| author | Brian Fox <bfox@gnu.org> |
|---|---|
| date | Wed, 22 Sep 1993 18:13:27 +0000 |
| parents | 8e36034f65e2 |
| children | fdca0d445357 |
| files | src/minibuf.c |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/minibuf.c Wed Sep 22 18:12:09 1993 +0000 +++ b/src/minibuf.c Wed Sep 22 18:13:27 1993 +0000 @@ -254,7 +254,9 @@ /* Add the value to the appropriate history list. */ if (XTYPE (Vminibuffer_history_variable) == Lisp_Symbol - && ! EQ (XSYMBOL (Vminibuffer_history_variable)->value, Qunbound)) + && ! EQ (XSYMBOL (Vminibuffer_history_variable)->value, Qunbound) + && NILP (Fstring_equal + (val, Fcar (Fsymbol_value (Vminibuffer_history_variable))))) Fset (Vminibuffer_history_variable, Fcons (val, Fsymbol_value (Vminibuffer_history_variable)));