branch: elpa/helm
commit 21c89a4339b6cc9658f29945318c60ed49cb954d
Merge: 16c25cce79 96153cd800
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: GitHub <nore...@github.com>

    Merge pull request #2594 from braineo/completing-read-fix
    
    support case when `HIST` is `t` in completing-read
---
 helm-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/helm-mode.el b/helm-mode.el
index f87a4f382a..3697fb4a09 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -883,8 +883,8 @@ that use `helm-comp-read'.  See `helm-M-x' for example."
                          :history (and (symbolp input-history) input-history)
                          :buffer buffer))
         (remove-hook 'helm-after-update-hook 
'helm-comp-read--move-to-first-real-candidate))
-      ;; If `history' is a symbol save it.
-      (when (and result history (symbolp history))
+      ;; If `history' is a symbol save it, except when it is t.
+      (when (and result history (symbolp history) (not (eq history t)))
         (set history
              ;; RESULT may be a a string or a list of strings bug #2461.
              (delete-dups (append (mapcar #'substring-no-properties 
(helm-mklist result))

Reply via email to