From: Matthias Meulien <orontee@gmail.com>
Date: Sat, 1 Oct 2022 06:46:50 +0000 (+0200)
Subject: Define ansi-osc customization group
X-Git-Tag: emacs-29.0.90~1856^2~107
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a2a91f0205b82030d502b3b1c48c78ccfe35fda6;p=emacs.git

Define ansi-osc customization group

* lisp/ansi-osc.el (ansi-osc): Define ansi-osc customization group
(ansi-osc-for-compilation-buffer): Fix wrong group
---

diff --git a/lisp/ansi-osc.el b/lisp/ansi-osc.el
index 67a85516281..34154998cdf 100644
--- a/lisp/ansi-osc.el
+++ b/lisp/ansi-osc.el
@@ -155,6 +155,17 @@ that is the value of `ansi-osc-handlers'."
         (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
+<URL:https://www.ecma-international.org/publications/standards/Ecma-048.htm>
+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 @@ must be in `compilation-filter-hook'."
   :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)