Helm/Geiser: Bind helm-comint-input-ring to M-p in Geiser

master
Pierre Neidhardt 2018-10-14 10:17:46 +02:00
parent eaa00f5b12
commit 2f2587eb81
1 changed files with 6 additions and 0 deletions

View File

@ -140,6 +140,12 @@
(define-key comint-mode-map (kbd "M-p") 'helm-comint-input-ring))
(add-hook 'comint-mode-hook 'ambrevar/helm/comint-set-keys)
;;; Geiser
(with-eval-after-load 'geiser-repl
(defun ambrevar/helm/geiser-set-keys ()
(define-key geiser-repl-mode-map (kbd "M-p") 'helm-comint-input-ring))
(add-hook 'geiser-repl-mode-hook 'ambrevar/helm/geiser-set-keys))
;;; TODO: Use helm-ff history in helm file completion.
;;; https://github.com/emacs-helm/helm/issues/1118
;; (define-key helm-read-file-map (kbd "M-p") 'helm-ff-run-switch-to-history)