[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master a2a91f0205 2/2: Define ansi-osc customization group
From: |
Lars Ingebrigtsen |
Subject: |
master a2a91f0205 2/2: Define ansi-osc customization group |
Date: |
Sat, 1 Oct 2022 05:59:43 -0400 (EDT) |
branch: master
commit a2a91f0205b82030d502b3b1c48c78ccfe35fda6
Author: Matthias Meulien <orontee@gmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
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 @@ 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)