From da4bca9eb2b7c5d28e47e7c2bc522731c770d0e3 Mon Sep 17 00:00:00 2001 From: Matthias Meulien Date: Sat, 1 Oct 2022 08:46:50 +0200 Subject: [PATCH] Define ansi-osc customization group * lisp/ansi-osc.el (ansi-osc): Define ansi-osc customization group (ansi-osc-for-compilation-buffer): Fix wrong group --- lisp/ansi-osc.el | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) diff --git a/lisp/ansi-osc.el b/lisp/ansi-osc.el index 67a8551628..34154998cd 100644 --- a/lisp/ansi-osc.el +++ b/lisp/ansi-osc.el @@ -155,6 +155,17 @@ ansi-osc-hyperlink-handler (and (string-match ";\\(.+\\)" text) (cons (point-marker) (match-string-no-properties 1 text))))) +(defgroup ansi-osc nil + "Interpretation of OSC escape sequences. +Handlers for OSC 2, 7 and 8 (for window title, current directory +and hyperlinks respectively) are provided. OSC (Operating System +Commands) control sequences are defined in section 8.3.89 of the +ECMA-48 standard is freely available at + +as a PDF file." + :version "29.1" + :group 'processes) + (defcustom ansi-osc-for-compilation-buffer 'filter "What to do with OSC escape sequences in compilation output. @@ -170,7 +181,7 @@ ansi-osc-for-compilation-buffer :type '(choice (const :tag "Do nothing" nil) (const :tag "Filter out OSC" filter) (other :tag "Translate OSC" t)) - :group 'osc + :group 'ansi-osc :version "29.1") (defvar compilation-filter-start) -- 2.30.2