diff options
| author | sabof <esabof@gmail.com> | 2014-02-12 08:13:44 +0000 |
|---|---|---|
| committer | sabof <esabof@gmail.com> | 2014-02-12 08:13:44 +0000 |
| commit | 378c1b7851bfbb04d55a468ea08cb099f12e18e8 (patch) | |
| tree | 0b8833facc6481d32b84d2f93eba6f4d36502873 /helm-misc.el | |
| parent | f12078f098c4789267df1b48a0d65c7138a64cc4 (diff) | |
helm-comint-input-ring support for all commint modes
Diffstat (limited to 'helm-misc.el')
| -rw-r--r-- | helm-misc.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/helm-misc.el b/helm-misc.el index 51f25afb..c252b09b 100644 --- a/helm-misc.el +++ b/helm-misc.el @@ -261,7 +261,7 @@ It is added to `extended-command-history'. (insert candidate))) (defvar helm-source-comint-input-ring - '((name . "Shell history") + '((name . "Comint history") (candidates . (lambda () (with-helm-current-buffer (ring-elements comint-input-ring)))) @@ -378,13 +378,13 @@ It is added to `extended-command-history'. ;;;###autoload (defun helm-comint-input-ring () - "Predefined `helm' that provide completion of `shell' history." + "Predefined `helm' that provide completion of `comint' history." (interactive) - (when (eq major-mode 'shell-mode) + (when (derived-mode-p 'comint-mode) (helm :sources 'helm-source-comint-input-ring :input (buffer-substring-no-properties (comint-line-beginning-position) (point-at-eol)) - :buffer "*helm shell history*"))) + :buffer "*helm comint history*"))) (provide 'helm-misc) |