diff options
| author | Stefan Kangas | 2025-03-20 19:21:08 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2025-03-20 19:21:08 +0100 |
| commit | 40a17ce3b238ea0223d1b3e1c72f48352e1ca63d (patch) | |
| tree | b2b4d0cade9772b0798c8ce7dcb5d4f126d3738b | |
| parent | f0800612e5c5835bd74459eab9dd8843ed9cdfd3 (diff) | |
| download | emacs-40a17ce3b238ea0223d1b3e1c72f48352e1ca63d.tar.gz emacs-40a17ce3b238ea0223d1b3e1c72f48352e1ca63d.zip | |
Make compilation-filter-hook into a defcustom
* lisp/progmodes/compile.el (compilation-filter-hook): Make variable
into a defcustom.
| -rw-r--r-- | lisp/progmodes/compile.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index a1264d8d7b0..1ca58b3ac7d 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el | |||
| @@ -85,14 +85,18 @@ Similarly, to remove a prefix \"bar/\", use: | |||
| 85 | (string :tag "Replace matched filename with")))) | 85 | (string :tag "Replace matched filename with")))) |
| 86 | :version "27.1") | 86 | :version "27.1") |
| 87 | 87 | ||
| 88 | (defvar compilation-filter-hook nil | 88 | (defcustom compilation-filter-hook nil |
| 89 | "Hook run after `compilation-filter' has inserted a string into the buffer. | 89 | "Hook run after `compilation-filter' has inserted a string into the buffer. |
| 90 | It is called with the variable `compilation-filter-start' bound | 90 | It is called with the variable `compilation-filter-start' bound |
| 91 | to the position of the start of the inserted text, and point at | 91 | to the position of the start of the inserted text, and point at |
| 92 | its end. | 92 | its end. |
| 93 | 93 | ||
| 94 | If Emacs lacks asynchronous process support, this hook is run | 94 | If Emacs lacks asynchronous process support, this hook is run |
| 95 | after `call-process' inserts the grep output into the buffer.") | 95 | after `call-process' inserts the grep output into the buffer." |
| 96 | :type 'hook | ||
| 97 | :options '(ansi-color-compilation-filter | ||
| 98 | ansi-osc-compilation-filter) | ||
| 99 | :version "31.1") | ||
| 96 | 100 | ||
| 97 | (defvar compilation-filter-start nil | 101 | (defvar compilation-filter-start nil |
| 98 | "Position of the start of the text inserted by `compilation-filter'. | 102 | "Position of the start of the text inserted by `compilation-filter'. |