chore: query formatting

queries/elm/highlights.scm

@@ -6,10 +6,8 @@
 ((block_comment) @comment.documentation
   (#lua-match? @comment.documentation "^{[-]|[^|]"))
 
-
 ; Keywords
 ;---------
-
 [
   "if"
   "then"
@@ -34,13 +32,9 @@
   (exposing)
 ] @keyword.import
 
-
 ; Punctuation
 ;------------
-
-[
-  (double_dot)
-] @punctuation.special
+(double_dot) @punctuation.special
 
 [
   ","
@@ -57,71 +51,89 @@
   "]"
 ] @punctuation.bracket
 
-
 ; Variables
 ;----------
-
 (value_qid
   (lower_case_identifier) @variable)
+
 (value_declaration
-  (function_declaration_left (lower_case_identifier) @variable))
+  (function_declaration_left
+    (lower_case_identifier) @variable))
+
 (type_annotation
   (lower_case_identifier) @variable)
+
 (port_annotation
   (lower_case_identifier) @variable)
+
 (anything_pattern
   (underscore) @variable)
+
 (record_base_identifier
   (lower_case_identifier) @variable)
+
 (lower_pattern
   (lower_case_identifier) @variable)
+
 (exposed_value
   (lower_case_identifier) @variable)
 
 (value_qid
-  ((dot) (lower_case_identifier) @variable.member))
+  ((dot)
+    (lower_case_identifier) @variable.member))
+
 (field_access_expr
-  ((dot) (lower_case_identifier) @variable.member))
+  ((dot)
+    (lower_case_identifier) @variable.member))
 
 (function_declaration_left
-  (anything_pattern (underscore) @variable.parameter))
-(function_declaration_left
-  (lower_pattern (lower_case_identifier) @variable.parameter))
+  (anything_pattern
+    (underscore) @variable.parameter))
 
+(function_declaration_left
+  (lower_pattern
+    (lower_case_identifier) @variable.parameter))
 
 ; Functions
 ;----------
-
 (value_declaration
   functionDeclarationLeft:
     (function_declaration_left
       (lower_case_identifier) @function
       (pattern)))
+
 (value_declaration
   functionDeclarationLeft:
     (function_declaration_left
       (lower_case_identifier) @function
       pattern: (_)))
+
 (value_declaration
   functionDeclarationLeft:
     (function_declaration_left
       (lower_case_identifier) @function)
   body: (anonymous_function_expr))
+
 (type_annotation
   name: (lower_case_identifier) @function
-  typeExpression: (type_expression (arrow)))
+  typeExpression:
+    (type_expression
+      (arrow)))
+
 (port_annotation
   name: (lower_case_identifier) @function
-  typeExpression: (type_expression (arrow)))
+  typeExpression:
+    (type_expression
+      (arrow)))
 
 (function_call_expr
-  target: (value_expr
-    (value_qid (lower_case_identifier) @function.call)))
-
+  target:
+    (value_expr
+      (value_qid
+        (lower_case_identifier) @function.call)))
 
 ; Operators
 ;----------
-
 [
   (operator_identifier)
   (eq)
@@ -131,31 +143,38 @@
   "::"
 ] @operator
 
-
 ; Modules
 ;--------
-
 (module_declaration
-  (upper_case_qid (upper_case_identifier) @module))
+  (upper_case_qid
+    (upper_case_identifier) @module))
+
 (import_clause
-  (upper_case_qid (upper_case_identifier) @module))
+  (upper_case_qid
+    (upper_case_identifier) @module))
+
 (as_clause
   (upper_case_identifier) @module)
-(value_expr
-  (value_qid (upper_case_identifier) @module))
 
+(value_expr
+  (value_qid
+    (upper_case_identifier) @module))
 
 ; Types
 ;------
-
 (type_declaration
   (upper_case_identifier) @type)
+
 (type_ref
-  (upper_case_qid (upper_case_identifier) @type))
+  (upper_case_qid
+    (upper_case_identifier) @type))
+
 (type_variable
   (lower_case_identifier) @type)
+
 (lower_type_name
   (lower_case_identifier) @type)
+
 (exposed_type
   (upper_case_identifier) @type)
 
@@ -164,34 +183,43 @@
 
 (field_type
   name: (lower_case_identifier) @property)
+
 (field
   name: (lower_case_identifier) @property)
 
 (type_declaration
-  (union_variant (upper_case_identifier) @constructor))
-(nullary_constructor_argument_pattern
-  (upper_case_qid (upper_case_identifier) @constructor))
-(union_pattern
-  (upper_case_qid (upper_case_identifier) @constructor))
-(value_expr
-  (upper_case_qid (upper_case_identifier)) @constructor)
+  (union_variant
+    (upper_case_identifier) @constructor))
 
+(nullary_constructor_argument_pattern
+  (upper_case_qid
+    (upper_case_identifier) @constructor))
+
+(union_pattern
+  (upper_case_qid
+    (upper_case_identifier) @constructor))
+
+(value_expr
+  (upper_case_qid
+    (upper_case_identifier)) @constructor)
 
 ; Literals
 ;---------
-
 (number_constant_expr
   (number_literal) @number)
 
 (upper_case_qid
-  ((upper_case_identifier) @boolean (#any-of? @boolean "True" "False")))
+  ((upper_case_identifier) @boolean
+    (#any-of? @boolean "True" "False")))
 
 [
   (open_quote)
   (close_quote)
 ] @string
+
 (string_constant_expr
   (string_escape) @string)
+
 (string_constant_expr
   (regular_string_part) @string)
 
@@ -199,7 +227,9 @@
   (open_char)
   (close_char)
 ] @character
+
 (char_constant_expr
   (string_escape) @character)
+
 (char_constant_expr
   (regular_string_part) @character)

queries/elm/injections.scm

@@ -1,8 +1,8 @@
 ([
-  (line_comment) 
+  (line_comment)
   (block_comment)
- ] @injection.content
- (#set! injection.language "comment"))
+] @injection.content
+  (#set! injection.language "comment"))
 
 ((glsl_content) @injection.content
- (#set! injection.language "glsl"))
+  (#set! injection.language "glsl"))