diff options
-rw-r--r-- | init.el | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/init.el b/init.el index 066741a..84f382a 100644 --- a/init.el +++ b/init.el | |||
@@ -255,11 +255,17 @@ | |||
255 | eshell-scroll-to-bottom-on-input 'all | 255 | eshell-scroll-to-bottom-on-input 'all |
256 | eshell-smart-space-goes-to-end t | 256 | eshell-smart-space-goes-to-end t |
257 | eshell-where-to-jump 'begin) | 257 | eshell-where-to-jump 'begin) |
258 | (:local-set outline-regexp eshell-prompt-regexp | 258 | (add-hook 'eshell-mode-hook |
259 | page-delimiter eshell-prompt-regexp) | 259 | (defun +eshell@setup () |
260 | (:bind "C-d" #'+eshell-quit-or-delete-char) | 260 | "Eshell improperly does loading. Gah." |
261 | (:when-loaded | 261 | (dolist (setting `((outline-regexp . ,eshell-prompt-regexp) |
262 | (setenv "PAGER" "cat"))) | 262 | (page-delimiter . ,eshell-prompt-regexp))) |
263 | (set (make-local-variable (car setting)) (cdr setting))) | ||
264 | (dolist (binding `(("C-d" . +eshell-quit-or-delete-char))) | ||
265 | (define-key eshell-mode-map | ||
266 | (kbd (car binding)) (cdr binding))) | ||
267 | (dolist (environment `(("PAGER" . "cat"))) | ||
268 | (setenv (car environment) (cdr environment)))))) | ||
263 | 269 | ||
264 | (setup eww | 270 | (setup eww |
265 | (:also-load +eww) | 271 | (:also-load +eww) |