[elpa] externals/auctex 545129e1c3 55/77: * style/shortvrb.el: Add missing macros incl. fontification.

[Tassilo Horn]

branch: externals/auctex
commit 545129e1c34f14749988ddd45f51e6736b4364fa
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@gnu.org>

    * style/shortvrb.el: Add missing macros incl. fontification.
---
 style/shortvrb.el | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/style/shortvrb.el b/style/shortvrb.el
index 5f8df9269a..a8b4cd1701 100644
--- a/style/shortvrb.el
+++ b/style/shortvrb.el
@@ -1,6 +1,6 @@
 ;;; shortvrb.el --- AUCTeX style for `shortvrb.sty'  -*- lexical-binding: t; 
-*-
 
-;; Copyright (C) 2009, 2014, 2018, 2020 Free Software Foundation, Inc.
+;; Copyright (C) 2009--2022 Free Software Foundation, Inc.
 
 ;; Author: Ralf Angeli <angeli@caeruleus.net>
 ;; Maintainer: auctex-devel@gnu.org
@@ -48,11 +48,19 @@
 (declare-function font-latex-add-to-syntax-alist
                   "font-latex"
                   (list))
+(declare-function font-latex-add-keywords
+                  "font-latex"
+                  (keywords class))
 
 (TeX-add-style-hook
  "shortvrb"
  (lambda ()
 
+   (TeX-add-symbols
+    '("MakeShortVerb"   (TeX-arg-string "Character" "\\"))
+    '("MakeShortVerb*"  (TeX-arg-string "Character" "\\"))
+    '("DeleteShortVerb" (TeX-arg-string "Character" "\\")))
+
    ;; Ispell: Add entries to `ispell-tex-skip-alist':
    (when LaTeX-shortvrb-chars
      (TeX-ispell-skip-setcar
@@ -67,7 +75,11 @@
               (eq TeX-install-font-lock 'font-latex-setup))
      (font-latex-add-to-syntax-alist
       (mapcar (lambda (char) (cons char "|"))
-              LaTeX-shortvrb-chars))))
+              LaTeX-shortvrb-chars))
+
+     (font-latex-add-keywords '(("MakeShortVerb"   "*{")
+                                ("DeleteShortVerb" "{"))
+                              'function)))
  TeX-dialect)
 
 ;;; shortvrb.el ends here