emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

emacs-30 df7f02a7954: Add tags to 'compilation-transform-file-match-alis


From: Robert Pluim
Subject: emacs-30 df7f02a7954: Add tags to 'compilation-transform-file-match-alist' custom type
Date: Wed, 4 Dec 2024 11:01:34 -0500 (EST)

branch: emacs-30
commit df7f02a7954c652896dcaae590caf9dc0c4dc6a1
Author: Robert Pluim <rpluim@gmail.com>
Commit: Robert Pluim <rpluim@gmail.com>

    Add tags to 'compilation-transform-file-match-alist' custom type
    
    * lisp/progmodes/compile.el (compilation-filter-start): Add some
    more meaningful tags, and switch to using 'radio' instead of
    'choice'.
---
 lisp/progmodes/compile.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index ee7fc6aaecb..241b29c65b0 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -77,8 +77,10 @@ an entry matching \"\\\\=`\" and a replacement regexp of 
\"bar/\", i.e.:
 Similarly, to remove a prefix \"bar/\", use:
 
     (\"\\\\=`bar/\" \"\")"
-  :type '(repeat (list regexp (choice (const :tag "No replacement" nil)
-                                      string)))
+  :type '(repeat (list (regexp :tag "Filename that matches")
+                       (radio :tag "Action"
+                              (const :tag "Do not consider as error" nil)
+                              (string :tag "Replace matched filename with"))))
   :version "27.1")
 
 (defvar compilation-filter-hook nil



reply via email to

[Prev in Thread] Current Thread [Next in Thread]