From 36f342ad71fdfdb8444ae9723ed4e383d57d82fb Mon Sep 17 00:00:00 2001
From: sefidel <contact@sefidel.net>
Date: Sun, 27 Feb 2022 00:32:05 +0900
Subject: feat(macro)!: use macro for highlighting

---
 fnl/nvrc/colors.fnl | 76 ++++++++++++++++++++++++++---------------------------
 1 file changed, 38 insertions(+), 38 deletions(-)

(limited to 'fnl/nvrc/colors.fnl')

diff --git a/fnl/nvrc/colors.fnl b/fnl/nvrc/colors.fnl
index b231e4e..074d870 100644
--- a/fnl/nvrc/colors.fnl
+++ b/fnl/nvrc/colors.fnl
@@ -22,54 +22,54 @@
 
 
 (lambda colors.apply [colorscheme]
-  (local {: highlight} (require :nvrc.macro.color))
+  (import-macros {: highlight! : link!} :nvrc.macro.color)
   (vim.cmd (.. "colorscheme " colorscheme))
 
   ; Buffer
-  (highlight :EndOfBuffer {:fg (. colors :bg)})
-  (highlight :FloatBorder {:fg (. colors :blue)})
-  (highlight :NormalFloat {:bg (. colors :bblack)})
+  (highlight! :EndOfBuffer {:fg (. colors :bg)})
+  (highlight! :FloatBorder {:fg (. colors :blue)})
+  (highlight! :NormalFloat {:bg (. colors :bblack)})
 
   ; Pmenu
-  (highlight :Pmenu {:bg (. colors :bblack)})
-  (highlight :PmenuSbar {:bg (. colors :bblack)})
-  (highlight :PmenuSel {:fg (. colors :orange) :bg (. colors :dgrey)})
-  (highlight :PmenuThumb {:bg (. colors :skyblue)})
-  (highlight :CmpItemAbbr {:fg (. colors :fg)})
-  (highlight :CmpItemAbbrMatch {:fg (. colors :fg)})
-  (highlight :CmpItemKind {:fg (. colors :fg)})
-  (highlight :CmpItemMenu {:fg (. colors :fg)})
+  (highlight! :Pmenu {:bg (. colors :bblack)})
+  (highlight! :PmenuSbar {:bg (. colors :bblack)})
+  (highlight! :PmenuSel {:fg (. colors :orange) :bg (. colors :dgrey)})
+  (highlight! :PmenuThumb {:bg (. colors :skyblue)})
+  (highlight! :CmpItemAbbr {:fg (. colors :fg)})
+  (highlight! :CmpItemAbbrMatch {:fg (. colors :fg)})
+  (highlight! :CmpItemKind {:fg (. colors :fg)})
+  (highlight! :CmpItemMenu {:fg (. colors :fg)})
 
   ; Misc
-  (highlight :StatusLine {:bg (. colors :bg)})
-  (highlight :StatusLineNC {:fg (. colors :grey) :bg (. colors :black) :underline true})
-  (highlight :TabLine {:fg (. colors :fg) :bg (. colors :mgrey)})
-  (highlight :TabLineFill {:fg (. colors :fg) :bg (. colors :bg)})
-  (highlight :TabLineSel {:fg (. colors :fg) :bg (. colors :grey2)})
-  (highlight :LineNr {:fg (. colors :grey)})
-  (highlight :NvimInternalError {:fg (. colors :red)})
-  (highlight :VertSplit {:fg (. colors :grey2)})
+  (highlight! :StatusLine {:bg (. colors :bg)})
+  (highlight! :StatusLineNC {:fg (. colors :grey) :bg (. colors :black) :underline true})
+  (highlight! :TabLine {:fg (. colors :fg) :bg (. colors :mgrey)})
+  (highlight! :TabLineFill {:fg (. colors :fg) :bg (. colors :bg)})
+  (highlight! :TabLineSel {:fg (. colors :fg) :bg (. colors :grey2)})
+  (highlight! :LineNr {:fg (. colors :grey)})
+  (highlight! :NvimInternalError {:fg (. colors :red)})
+  (highlight! :VertSplit {:fg (. colors :grey2)})
 
   ; LSP
-  (highlight :DiagnosticError {:fg (. colors :red)})
-  (highlight :DiagnosticWarn {:fg (. colors :yellow)})
-  (highlight :DiagnosticInformation {:fg (. colors :green)})
-  (highlight :DiagnosticHint {:fg (. colors :grey)})
-  (highlight :LspReferenceRead {:underline true})
-  (highlight :LspReferenceText {:underline true})
-  (highlight :LspReferenceWrite {:underline true})
-  (highlight :LspSemantic_type {:link :Include})
-  (highlight :LspSemantic_function {:link :Identifier})
-  (highlight :LspSemantic_struct {:link :Number})
-  (highlight :LspSemantic_variable {:bg :gray})
-  (highlight :LspSemantic_keyword {:link :Structure})
+  (highlight! :DiagnosticError {:fg (. colors :red)})
+  (highlight! :DiagnosticWarn {:fg (. colors :yellow)})
+  (highlight! :DiagnosticInformation {:fg (. colors :green)})
+  (highlight! :DiagnosticHint {:fg (. colors :grey)})
+  (highlight! :LspReferenceRead {:underline true})
+  (highlight! :LspReferenceText {:underline true})
+  (highlight! :LspReferenceWrite {:underline true})
+  (highlight! :LspSemantic_variable {:bg :gray})
+  (link! :LspSemantic_type :Include)
+  (link! :LspSemantic_function :Identifier)
+  (link! :LspSemantic_struct :Number)
+  (link! :LspSemantic_keyword :Structure)
 
   ; Lir
-  (highlight :LirFloatNormal {:bg (. colors :black)})
-  (highlight :LirDir {:fg (. colors :skyblue)})
-  (highlight :LirSymLink {:fg (. colors :grey)})
-  (highlight :LirEmptyDirText {:fg (. colors :blue)})
-  (highlight :LirFloatCurdirWindowNormal {:bg (. colors :black)})
-  (highlight :LirFloatCurdirWindowDirName {:fg (. colors :skyblue)}))
+  (highlight! :LirFloatNormal {:bg (. colors :black)})
+  (highlight! :LirDir {:fg (. colors :skyblue)})
+  (highlight! :LirSymLink {:fg (. colors :grey)})
+  (highlight! :LirEmptyDirText {:fg (. colors :blue)})
+  (highlight! :LirFloatCurdirWindowNormal {:bg (. colors :black)})
+  (highlight! :LirFloatCurdirWindowDirName {:fg (. colors :skyblue)}))
 
 colors
-- 
cgit 1.4.1