diff options
| author | Blake Romero <blake@blkrom.com> | 2025-08-12 11:05:16 +0100 |
|---|---|---|
| committer | Blake Romero <blake@blkrom.com> | 2025-08-12 11:05:16 +0100 |
| commit | 2ed340a3240b105533d7e2ecb03e99a027a838e6 (patch) | |
| tree | c6cbcc177fa3cfe1f68b2493bb9464c734b086fd | |
| parent | 43bb02d1a377b86f2d9e85e1983b1107bb2288f8 (diff) | |
Update shell defadvice to use advice-add
| -rw-r--r-- | emacs-config.org | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/emacs-config.org b/emacs-config.org index be4cf18..ff4baff 100644 --- a/emacs-config.org +++ b/emacs-config.org @@ -1282,11 +1282,13 @@ Make shell prompt and output read-only. #+begin_src elisp (with-eval-after-load 'shell (setq-default comint-prompt-read-only t) - (defadvice comint-output-filter (after output-readonly activate) - "Set last process output read-only." - (add-text-properties - comint-last-output-start (line-end-position 0) - '(read-only t rear-nonsticky (inhibit-line-move-field-capture))))) + (advice-add 'comint-output-filter + :after (lambda (&rest r) + "Set last process output read-only." + (add-text-properties + comint-last-output-start (line-end-position 0) + '(read-only t rear-nonsticky + (inhibit-line-move-field-capture)))))) #+end_src ** Eshell |