summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2021-08-11 22:04:22 -0500
committerCase Duckworth2021-08-11 22:04:22 -0500
commit1fa1054de6ef3306c00d185109edb4c82e4f5fec (patch)
tree9f230e31517533f28a7d0091e15262cd5ed7eaf1
parentAdd acdw-compat.el (diff)
downloademacs-1fa1054de6ef3306c00d185109edb4c82e4f5fec.tar.gz
emacs-1fa1054de6ef3306c00d185109edb4c82e4f5fec.zip
Set up eshell prompt for outline
-rw-r--r--init.el10
1 files changed, 6 insertions, 4 deletions
diff --git a/init.el b/init.el index 733de04..c6370a0 100644 --- a/init.el +++ b/init.el
@@ -370,8 +370,8 @@
370 (apply f r)))) 370 (apply f r))))
371 371
372 (:hook erc-autoaway-mode 372 (:hook erc-autoaway-mode
373 erc-track-mode 373 erc-track-mode
374 erc-truncate-mode) 374 erc-truncate-mode)
375 375
376 (:bind "C-c C-b" acdw-erc/erc-switch-to-buffer 376 (:bind "C-c C-b" acdw-erc/erc-switch-to-buffer
377 "C-c C-c" nil ; def: `erc-toggle-interpret-controls' 377 "C-c C-c" nil ; def: `erc-toggle-interpret-controls'
@@ -417,9 +417,11 @@ like a dumbass."
417 ;; Define keys 417 ;; Define keys
418 (dolist (spec '(("C-d" . eshell-quit-or-delete-char))) 418 (dolist (spec '(("C-d" . eshell-quit-or-delete-char)))
419 (define-key eshell-mode-map (kbd (car spec)) (function (cdr spec)))) 419 (define-key eshell-mode-map (kbd (car spec)) (function (cdr spec))))
420 ;; Etc. 420 ;; Fix modeline
421 (when (boundp 'simple-modeline--mode-line) 421 (when (boundp 'simple-modeline--mode-line)
422 (setq mode-line-format '(:eval simple-modeline--mode-line)))) 422 (setq mode-line-format '(:eval simple-modeline--mode-line)))
423 ;; Set outline-regexp for consult-outline
424 (setq outline-regexp eshell-prompt-regexp))
423 425
424 (defun eshell-buffer-name () 426 (defun eshell-buffer-name ()
425 (rename-buffer (concat "*eshell*<" (eshell/pwd) ">") t)) 427 (rename-buffer (concat "*eshell*<" (eshell/pwd) ">") t))