dotfiles/home/config/nvim/nifoc/tabline.fnl

(let [mod {}
      api vim.api
      heirline-utils (require :heirline.utils)
      dracula (require :dracula)
      colors (dracula.colors)
      statusline (require :nifoc.statusline)
      fg-active (. (heirline-utils.get_highlight :TabLineSel) :fg)
      fg-inactive (. (heirline-utils.get_highlight :TabLine) :fg)
      bg-active (. (heirline-utils.get_highlight :TabLineSel) :bg)
      bg-inactive (. (heirline-utils.get_highlight :TabLine) :bg)]
  ;; Utils
  (set mod.space
       {:provider " "
        :hl (fn [self]
              (if self.is_active {:bg bg-active} {:bg bg-inactive}))})
  (set mod.truncate-left {:provider "" :hl {:fg fg-inactive}})
  (set mod.truncate-right {:provider "" :hl {:fg fg-inactive}})
  ;; Filename
  (set mod.filename-block
       {:init (fn [self]
                (set self.filename (api.nvim_buf_get_name self.bufnr)))
        :hl (fn [self]
              (if self.is_active :TabLineSel :TabLine))
        :on_click {:name :heirline_tabline_buffer_callback
                   :callback (fn [_ minwid]
                               (api.nvim_win_set_buf 0 minwid))
                   :minwid (fn [self]
                             self.bufnr)}})
  (set mod.filename
       {:provider (fn [self]
                    (if (= self.filename "") "[No Name]"
                        (vim.fn.fnamemodify self.filename ":t")))
        :hl (fn [self]
              (let [visible (or self.is_active self.is_visible)]
                {:bold visible :italic visible}))})
  (set mod.file-flags [{:provider (fn [self]
                                    (when (. vim :bo self.bufnr :modified)
                                      " "))
                        :hl {:fg colors.yellow}}
                       {:provider (fn [self]
                                    (when (or (not (. vim :bo self.bufnr
                                                      :modifiable))
                                              (. vim :bo self.bufnr :readonly))
                                      " "))
                        :hl {:fg colors.orange}}])
  (set mod.filename-block
       (heirline-utils.insert mod.filename-block statusline.file-icon
                              mod.filename mod.file-flags))
  ;; Buttons
  (set mod.close-button
       {:condition (fn [self]
                     (not (. vim :bo self.bufnr :modified)))
        1 mod.space
        2 {:provider ""
           :hl (fn [self]
                 (if self.is_active {:fg fg-active :bg bg-active}
                     {:fg fg-inactive :bg bg-inactive}))
           :on_click {:name :heirline_tabline_close_buffer_callback
                      :callback (fn [_ minwid]
                                  (api.nvim_buf_delete minwid {:force false}))
                      :minwid (fn [self]
                                self.bufnr)}}})
  ;; Indicator
  (set mod.active-indicator
       {:provider (fn [self]
                    (if self.is_active "┃ " "  "))
        :hl (fn [self]
              (if self.is_active {:fg colors.purple :bg bg-active :bold true}
                  {:fg fg-inactive :bg bg-inactive :bold true}))})
  ;; Block
  (set mod.buffer-block [mod.active-indicator
                         mod.filename-block
                         mod.close-button
                         mod.space])
  mod)