diff options
| author | jjanzen <jjanzen@jjanzen.ca> | 2025-03-15 08:56:13 -0500 |
|---|---|---|
| committer | jjanzen <jjanzen@jjanzen.ca> | 2025-03-15 08:56:13 -0500 |
| commit | 0b61f86ab9d3ffc685b465bf054ed4aa9c4c71fb (patch) | |
| tree | 877d099b9e18d40b16cab6f969202cfb3196bf74 /common | |
| parent | 05a7f457bf5a6fa4086cf57587e28e392e54a388 (diff) | |
system changes
Diffstat (limited to 'common')
| -rw-r--r-- | common/.config/emacs/init.el.org | 46 |
1 files changed, 23 insertions, 23 deletions
diff --git a/common/.config/emacs/init.el.org b/common/.config/emacs/init.el.org index 9db55c7..34a6f7e 100644 --- a/common/.config/emacs/init.el.org +++ b/common/.config/emacs/init.el.org @@ -313,29 +313,29 @@ Install a better PDF viewer than =DocView=. Install and configure =eat= as a terminal emulator in Emacs with =eshell= as a shell. #+begin_src emacs-lisp ;; Overwrite a default function that makes the prompt editable for some reason - (eval-after-load "em-prompt" '(defun eshell-emit-prompt ()) - "Emit a prompt if eshell is being used interactively." - (when (boundp 'ansi-color-context-region) - (setq ansi-color-context-region nil)) - (run-hooks 'eshell-before-prompt-hook) - (if (not eshell-prompt-function) - (set-marker eshell-last-output-end (point)) - (let ((prompt (funcall eshell-prompt-function))) - (add-text-properties - 0 (length prompt) - (if eshell-highlight-prompt - '( read-only t - field prompt - font-lock-face eshell-prompt - front-sticky (read-only field font-lock-face) - rear-nonsticky (read-only field font-lock-face)) - '( read-only t - field prompt - front-sticky (read-only field font-lock-face) - rear-nonsticky (read-only field font-lock-face))) - prompt) - (eshell-interactive-filter nil prompt))) - (run-hooks 'eshell-after-prompt-hook)) + (eval-after-load "em-prompt" '(defun eshell-emit-prompt () + "Emit a prompt if eshell is being used interactively." + (when (boundp 'ansi-color-context-region) + (setq ansi-color-context-region nil)) + (run-hooks 'eshell-before-prompt-hook) + (if (not eshell-prompt-function) + (set-marker eshell-last-output-end (point)) + (let ((prompt (funcall eshell-prompt-function))) + (add-text-properties + 0 (length prompt) + (if eshell-highlight-prompt + '( read-only t + field prompt + font-lock-face eshell-prompt + front-sticky (read-only field font-lock-face) + rear-nonsticky (read-only field font-lock-face)) + '( read-only t + field prompt + front-sticky (read-only field font-lock-face) + rear-nonsticky (read-only field font-lock-face))) + prompt) + (eshell-interactive-filter nil prompt))) + (run-hooks 'eshell-after-prompt-hook))) (use-package eat :init |