(let ((inhibit-read-only t))
(erase-buffer))
(eshell-send-input))
+ (defun b/eshell-history ()
+ (interactive)
+ (completing-read "Eshell history: "
+ (ring-elements eshell-history-ring)))
(defun b/eshell-setup ()
(make-local-variable 'company-idle-delay)
(defvar company-idle-delay)
#'b/eshell-quit-or-delete-char)
(define-key eshell-mode-map (kbd "C-S-l")
#'b/eshell-clear)
- (define-key eshell-mode-map (kbd "M-r")
- #'counsel-esh-history)
- ;; (define-key eshell-mode-map [tab]
- ;; #'company-complete)
(define-key eshell-hist-mode-map (kbd "M-r")
- #'counsel-esh-history)))
+ #'b/eshell-history)))
;; global key bindings
(global-set-key (kbd "C-c a s e") #'eshell)
;; hooks