This commit is contained in:
elkowar 2021-05-08 20:18:22 +02:00
parent d2055b9191
commit a86abb6e56
No known key found for this signature in database
GPG key ID: E321AD71B1D1F27F
11 changed files with 82 additions and 95 deletions

View file

@ -0,0 +1,38 @@
(module colors
{}
{:dark0_hard "#1d2021"
:dark0 "#282828"
:dark0_soft "#32302f"
:dark1 "#3c3836"
:dark2 "#504945"
:dark3 "#665c54"
:dark4 "#7c6f64"
:light0_hard "#f9f5d7"
:light0 "#fbf1c7"
:light0_soft "#f2e5bc"
:light1 "#ebdbb2"
:light2 "#d5c4a1"
:light3 "#bdae93"
:light4 "#a89984"
:bright_red "#fb4934"
:bright_green "#b8bb26"
:bright_yellow "#fabd2f"
:bright_blue "#83a598"
:bright_purple "#d3869b"
:bright_aqua "#8ec07c"
:bright_orange "#fe8019"
:neutral_red "#cc241d"
:neutral_green "#98971a"
:neutral_yellow "#d79921"
:neutral_blue "#458588"
:neutral_purple "#b16286"
:neutral_aqua "#689d6a"
:neutral_orange "#d65d0e"
:faded_red "#9d0006"
:faded_green "#79740e"
:faded_yellow "#b57614"
:faded_blue "#076678"
:faded_purple "#8f3f71"
:faded_aqua "#427b58"
:faded_orange "#af3a03"
:gray "#928374"})

View file

@ -3,7 +3,8 @@
str aniseed.string str aniseed.string
nvim aniseed.nvim nvim aniseed.nvim
a aniseed.core a aniseed.core
fennel aniseed.fennel} fennel aniseed.fennel
colors colors}
require-macros [macros]}) require-macros [macros]})
(macro make-errors-epic [f] (macro make-errors-epic [f]
@ -14,10 +15,8 @@
(make-errors-epic (require "plugins.lsp")) (make-errors-epic (require "plugins.lsp"))
(make-errors-epic (require "keybinds")) (make-errors-epic (require "keybinds"))
(def- colors utils.colors)
(pkg conjure [] (set vim.g.conjure#client#fennel#aniseed#aniseed_module_prefix "aniseed.")
(set vim.g.conjure#client#fennel#aniseed#aniseed_module_prefix "aniseed."))
; Colors ------------------------------------------------------- foldstart ; Colors ------------------------------------------------------- foldstart

View file

@ -26,7 +26,8 @@
:pkg :pkg
(fn [name mappings ...] (fn [name mappings ...]
(if (~= nil (. packer_plugins `,(tostring name))) ;(if (~= nil (. packer_plugins `,(tostring name)))
(if true
`(let ,mappings ,...) `(let ,mappings ,...)
(print (.. "plugin disabled " `,(tostring name))))) (print (.. "plugin disabled " `,(tostring name)))))

View file

@ -1,27 +1,7 @@
(module plugins (module plugins
{require {utils utils {require {utils utils}})
a aniseed.core
packer packer}
require-macros [macros]})
(defn safe-require-plugin-config [name] (utils.use
(xpcall
#(require name)
#(a.println (.. "Error sourcing " name ":\n" (fennel.traceback $1)))))
(defn- use [...]
"Iterates through the arguments as pairs and calls packer's function for
each of them. Works around Fennel not liking mixed associative and sequential
tables as well."
(let [pkgs [...]]
(packer.startup
(fn [use]
(each-pair [name opts pkgs]
(-?> (. opts :mod) (safe-require-plugin-config))
(use (a.assoc opts 1 name)))))))
(use
:nvim-telescope/telescope.nvim {:mod "plugins.telescope" :nvim-telescope/telescope.nvim {:mod "plugins.telescope"
:requires [:nvim-lua/popup.nvim :nvim-lua/plenary.nvim]} :requires [:nvim-lua/popup.nvim :nvim-lua/plenary.nvim]}

View file

@ -3,9 +3,9 @@
fennel aniseed.fennel fennel aniseed.fennel
nvim aniseed.nvim nvim aniseed.nvim
utils utils utils utils
bufferline bufferline}}) bufferline bufferline
colors colors}})
(def- colors utils.colors)
; :h bufferline-lua-highlights ; :h bufferline-lua-highlights
(let [selected {:guibg colors.neutral_aqua :guifg colors.dark0 :gui ""} (let [selected {:guibg colors.neutral_aqua :guifg colors.dark0 :gui ""}

View file

@ -3,6 +3,7 @@
fennel aniseed.fennel fennel aniseed.fennel
nvim aniseed.nvim nvim aniseed.nvim
utils utils utils utils
colors colors
galaxyline galaxyline galaxyline galaxyline
gl-condition galaxyline.condition gl-condition galaxyline.condition
@ -12,8 +13,6 @@
require-macros [macros]}) require-macros [macros]})
(def- colors utils.colors)
(local modes (local modes
{:n {:text "NORMAL" :colors {:bg colors.neutral_aqua :fg colors.dark0}} {:n {:text "NORMAL" :colors {:bg colors.neutral_aqua :fg colors.dark0}}
:i {:text "INSERT" :colors {:bg colors.neutral_yellow :fg colors.dark0}} :i {:text "INSERT" :colors {:bg colors.neutral_yellow :fg colors.dark0}}

View file

@ -1,19 +1,20 @@
(module plugins.gitsigns (module plugins.gitsigns
{autoload {utils utils {autoload {utils utils
colors colors
gitsigns gitsigns}}) gitsigns gitsigns}})
; ; https://github.com/lewis6991/gitsigns.nvim ; https://github.com/lewis6991/gitsigns.nvim
; (gitsigns.setup (gitsigns.setup
; {:signs {:add {:text "▍"} {:signs {:add {:text "▍"}
; :change {:text "▍"} :change {:text "▍"}
; :delete {:text "▍"} :delete {:text "▍"}
; :topdelete {:text "▍"} :topdelete {:text "▍"}
; :changedelete {:text "▍"}} :changedelete {:text "▍"}}
; :keymaps {:noremap true :keymaps {:noremap true
; :buffer true} :buffer true}
; :current_line_blame true :current_line_blame true
; :update_debounce 100}) :update_debounce 100})
;
; (utils.highlight "GitSignsAdd" {:bg "NONE" :fg colors.bright_aqua}) (utils.highlight "GitSignsAdd" {:bg "NONE" :fg colors.bright_aqua})
; (utils.highlight "GitSignsDelete" {:bg "NONE" :fg colors.neutral_red}) (utils.highlight "GitSignsDelete" {:bg "NONE" :fg colors.neutral_red})
; (utils.highlight "GitSignsChange" {:bg "NONE" :fg colors.bright_blue}) (utils.highlight "GitSignsChange" {:bg "NONE" :fg colors.bright_blue})

View file

@ -4,11 +4,11 @@
nvim aniseed.nvim nvim aniseed.nvim
lsp lspconfig lsp lspconfig
lsp-configs lspconfig.configs lsp-configs lspconfig.configs
utils utils} utils utils
colors colors}
require-macros [macros]}) require-macros [macros]})
(def- colors utils.colors)
(pkg symbols-outline.nvim [symbols-outline (require "symbols-outline")] (pkg symbols-outline.nvim [symbols-outline (require "symbols-outline")]
(symbols-outline.setup { :highlight_hovered_item true :show_guides true})) (symbols-outline.setup { :highlight_hovered_item true :show_guides true}))

View file

@ -7,6 +7,4 @@
{:defaults {:defaults
{:i { "<esc>" actions.close}}}) {:i { "<esc>" actions.close}}})
(telescope.load_extension "media_files")
(utils.keymap :n :<C-p> ":Telescope find_files<CR>") (utils.keymap :n :<C-p> ":Telescope find_files<CR>")

View file

@ -43,54 +43,25 @@
(nvim.buf_del_keymap 0 mode from) (nvim.buf_del_keymap 0 mode from)
(nvim.del_keymap mode from))) (nvim.del_keymap mode from)))
(defn- use [...]
(defn- safe-require-plugin-config [name]
(xpcall
#(require name)
#(a.println (.. "Error sourcing " name ":\n" (fennel.traceback $1)))))
(defn use [...]
"Iterates through the arguments as pairs and calls packer's function for "Iterates through the arguments as pairs and calls packer's function for
each of them. Works around Fennel not liking mixed associative and sequential each of them. Works around Fennel not liking mixed associative and sequential
tables as well." tables as well.
(let [pkgs [...]] Additionally sources the file set in the :mod field of the plugin options"
(let [pkgs [...]
packer (require "packer")]
(packer.startup (packer.startup
(fn [use] (fn [use]
(each-pair [name opts pkgs] (each-pair [name opts pkgs]
(-?> (. opts :mod) (safe-require-plugin-config)) (-?> (. opts :mod) (safe-require-plugin-config))
(use (a.assoc opts 1 name))))))) (use (a.assoc opts 1 name)))))))
(def colors
{ :dark0_hard "#1d2021"
:dark0 "#282828"
:dark0_soft "#32302f"
:dark1 "#3c3836"
:dark2 "#504945"
:dark3 "#665c54"
:dark4 "#7c6f64"
:light0_hard "#f9f5d7"
:light0 "#fbf1c7"
:light0_soft "#f2e5bc"
:light1 "#ebdbb2"
:light2 "#d5c4a1"
:light3 "#bdae93"
:light4 "#a89984"
:bright_red "#fb4934"
:bright_green "#b8bb26"
:bright_yellow "#fabd2f"
:bright_blue "#83a598"
:bright_purple "#d3869b"
:bright_aqua "#8ec07c"
:bright_orange "#fe8019"
:neutral_red "#cc241d"
:neutral_green "#98971a"
:neutral_yellow "#d79921"
:neutral_blue "#458588"
:neutral_purple "#b16286"
:neutral_aqua "#689d6a"
:neutral_orange "#d65d0e"
:faded_red "#9d0006"
:faded_green "#79740e"
:faded_yellow "#b57614"
:faded_blue "#076678"
:faded_purple "#8f3f71"
:faded_aqua "#427b58"
:faded_orange "#af3a03"
:gray "#928374"})
(defn surround-if-present [a mid b] (defn surround-if-present [a mid b]
(if mid (if mid

View file

@ -243,10 +243,10 @@ let g:qs_lazy_highlight = 1
au VimEnter * RainbowParenthesesToggle " au VimEnter * RainbowParenthesesToggle
au Syntax * RainbowParenthesesLoadRound " au Syntax * RainbowParenthesesLoadRound
au Syntax * RainbowParenthesesLoadSquare " au Syntax * RainbowParenthesesLoadSquare
au Syntax * RainbowParenthesesLoadBraces " au Syntax * RainbowParenthesesLoadBraces