mprodrigues/emacs.d
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

modernize and move eshell configuration to extras.el. remove eshell-setup.el. use paredit by default in lisp and elisp modes

Browse Source
This commit is contained in:
Mateus Rodrigues
2026-07-12 13:14:12 +01:00
parent 179bd6dd42
commit 1e877af4aa
2 changed files with 20 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
elisp/eshell-setup.el
View File

@@ -1,4 +0,0 @@
(require 'esh-mode)
(add-to-list 'eshell-preoutput-filter-functions 'xterm-color-filter)
(setq eshell-output-filter-functions
(remove 'eshell-handle-ansi-color eshell-output-filter-functions))

32
elisp/extras.el
View File

@@ -72,22 +72,27 @@
;; Read feeds ;; Read feeds
(use-package elfeed) (use-package elfeed)
;; Programming environment ;; Eshell configuration
;; We need colors in eshell ;; We need colors in eshell
(use-package xterm-color) (use-package xterm-color)
(use-package eshell (use-package eshell
:straight (:type built-in) :straight (:type built-in)
:hook (eshell-mode . (lambda () :hook ((eshell-mode . (lambda ()
(setenv "TERM" "xterm-256color"))) (setenv "TERM" "xterm-256color")))
:hook (eshell-before-prompt . (lambda () ;; remove up and down from history keymap so we can use them to move up and
(setq xterm-color-preserve-properties t))) ;; down like in a normal text
:hook (eshell-mode . (lambda () (eshell-mode . (lambda ()
(progn (keymap-set eshell-hist-mode-map "<up>" nil)
(define-key eshell-hist-mode-map (kbd "<up>") nil) (keymap-set eshell-hist-mode-map "<down>" nil)))
(define-key eshell-hist-mode-map (kbd "<down>") nil)))) (eshell-before-prompt . (lambda ()
(setq xterm-color-preserve-properties t))))
:config :config
(load "~/.emacs.d/elisp/eshell-setup.el")) (require 'esh-mode)
(add-to-list 'eshell-preoutput-filter-functions 'xterm-color-filter)
(setq eshell-output-filter-functions
(remove 'eshell-handle-ansi-color eshell-output-filter-functions)))
;; eat terminal emulator: ;; eat terminal emulator:
(use-package eat (use-package eat
@@ -98,7 +103,9 @@
"*.ti" ("terminfo/e" "terminfo/e/*") "*.ti" ("terminfo/e" "terminfo/e/*")
("terminfo/65" "terminfo/65/*") ("terminfo/65" "terminfo/65/*")
("integration" "integration/*") ("integration" "integration/*")
(:exclude ".dir-locals.el" "*-tests.el")))) (:exclude ".dir-locals.el" "*-tests.el")))
:hook ((eshell-first-time-mode . eat-eshell-mode)
(eshell-first-time-mode . eat-eshell-visual-command-mode)))
;; git ;; git
(use-package magit (use-package magit
@@ -126,7 +133,8 @@
:config :config
(load "~/.emacs.d/elisp/slime-setup.el")) (load "~/.emacs.d/elisp/slime-setup.el"))
(use-package paredit) (use-package paredit
:hook ((lisp-mode emacs-lisp-mode) . paredit-mode))
;; Clojure ;; Clojure
(use-package cider) (use-package cider)