From 3b5704440f88ecc98fb5afb5378b95acd4b2fa7f Mon Sep 17 00:00:00 2001
From: "Johannes R. L. Dickenson"
 <71744831+johannesrld@users.noreply.github.com>
Date: Mon, 10 Jun 2024 23:15:41 +0800
Subject: fix(commonlisp): correctly highlight quotes (#6565)

---
 queries/commonlisp/highlights.scm | 21 ++++++++-------------
 1 file changed, 8 insertions(+), 13 deletions(-)

diff --git a/queries/commonlisp/highlights.scm b/queries/commonlisp/highlights.scm
index 84f132e48..7236c84de 100644
--- a/queries/commonlisp/highlights.scm
+++ b/queries/commonlisp/highlights.scm
@@ -105,24 +105,19 @@
   (#lua-match? @variable.builtin "^[*].+[*]$"))
 
 ; quote
-"'" @string.escape
-
 (format_specifier) @string.escape
 
-(quoting_lit) @string.escape
-
-; syntax quote
-"`" @string.escape
-
-"," @string.escape
-
-",@" @string.escape
+(quoting_lit
+  "'" @string.escape)
 
-(syn_quoting_lit) @string.escape
+(syn_quoting_lit
+  "`" @string.escape)
 
-(unquoting_lit) @none
+(unquoting_lit
+  "," @string.escape)
 
-(unquote_splicing_lit) @none
+(unquote_splicing_lit
+  ",@" @string.escape)
 
 [
   "("
-- 
cgit v1.3.1