wip: update eshell setup
This commit is contained in:
@@ -1,23 +1,4 @@
|
|||||||
;; colors in eshell
|
|
||||||
|
|
||||||
(add-hook 'eshell-mode-hook
|
|
||||||
(lambda ()
|
|
||||||
(setenv "TERM" "xterm-256color")))
|
|
||||||
(add-hook 'eshell-before-prompt-hook (lambda ()
|
|
||||||
(setq xterm-color-preserve-properties t)))
|
|
||||||
|
|
||||||
(require 'esh-mode)
|
(require 'esh-mode)
|
||||||
(add-to-list 'eshell-preoutput-filter-functions 'xterm-color-filter)
|
(add-to-list 'eshell-preoutput-filter-functions 'xterm-color-filter)
|
||||||
(setq eshell-output-filter-functions
|
(setq eshell-output-filter-functions
|
||||||
(remove 'eshell-handle-ansi-color eshell-output-filter-functions))
|
(remove 'eshell-handle-ansi-color eshell-output-filter-functions))
|
||||||
|
|
||||||
;; Don't cycle through history with <up> and <down>
|
|
||||||
;; Those keys were previously bound to:
|
|
||||||
;; eshell-previous-matching-input-from-input and
|
|
||||||
;; eshell-next-matching-input-from-input, respectively
|
|
||||||
(defun my-eshell-setup ()
|
|
||||||
(progn
|
|
||||||
(define-key eshell-hist-mode-map (kbd "<up>") nil)
|
|
||||||
(define-key eshell-hist-mode-map (kbd "<down>") nil)))
|
|
||||||
|
|
||||||
(add-hook 'eshell-mode-hook #'my-eshell-setup)
|
|
||||||
|
|||||||
@@ -82,6 +82,19 @@
|
|||||||
;; We need colors in eshell
|
;; We need colors in eshell
|
||||||
(use-package xterm-color)
|
(use-package xterm-color)
|
||||||
|
|
||||||
|
(use-package eshell
|
||||||
|
:straight (:type built-in)
|
||||||
|
:hook (eshell-mode . (lambda ()
|
||||||
|
(setenv "TERM" "xterm-256color")))
|
||||||
|
:hook (eshell-before-prompt . (lambda ()
|
||||||
|
(setq xterm-color-preserve-properties t)))
|
||||||
|
:hook (eshell-mode . (lambda ()
|
||||||
|
(progn
|
||||||
|
(define-key eshell-hist-mode-map (kbd "<up>") nil)
|
||||||
|
(define-key eshell-hist-mode-map (kbd "<down>") nil))))
|
||||||
|
:config
|
||||||
|
(load "~/.emacs.d/elisp/eshell-setup.el"))
|
||||||
|
|
||||||
;; eat terminal emulator:
|
;; eat terminal emulator:
|
||||||
(use-package eat
|
(use-package eat
|
||||||
:straight (:type git
|
:straight (:type git
|
||||||
|
|||||||
Reference in New Issue
Block a user