Ignore generated lua files

This commit is contained in:
buffet 2021-05-09 18:29:54 +00:00
parent bd7fe39bb2
commit 0a9cf93c12
9 changed files with 1 additions and 512 deletions

2
.gitignore vendored
View file

@ -1 +1 @@
/secrets /nvim/.config/nvim/lua

View file

@ -1,44 +0,0 @@
local _0_0
do
local name_0_ = "init"
local module_0_
do
local x_0_ = package.loaded[name_0_]
if ("table" == type(x_0_)) then
module_0_ = x_0_
else
module_0_ = {}
end
end
module_0_["aniseed/module"] = name_0_
module_0_["aniseed/locals"] = ((module_0_)["aniseed/locals"] or {})
module_0_["aniseed/local-fns"] = ((module_0_)["aniseed/local-fns"] or {})
package.loaded[name_0_] = module_0_
_0_0 = module_0_
end
local autoload = (require("aniseed.autoload")).autoload
local function _1_(...)
local ok_3f_0_, val_0_ = nil, nil
local function _1_()
return {require("aniseed.core"), require("aniseed.nvim")}
end
ok_3f_0_, val_0_ = pcall(_1_)
if ok_3f_0_ then
_0_0["aniseed/local-fns"] = {require = {a = "aniseed.core", nvim = "aniseed.nvim"}}
return val_0_
else
return print(val_0_)
end
end
local _local_0_ = _1_(...)
local a = _local_0_[1]
local nvim = _local_0_[2]
local _2amodule_2a = _0_0
local _2amodule_name_2a = "init"
do local _ = ({nil, _0_0, nil, {{}, nil, nil, nil}})[2] end
local config_path = nvim.fn.stdpath("config")
local module_glob = (config_path .. "/fnl/modules/**/*.fnl")
for _, path in ipairs(vim.fn.glob(module_glob, true, true, true)) do
require(string.gsub(string.gsub(string.gsub(string.gsub(path, (config_path .. "/fnl/"), ""), "/", "."), ".fnl", ""), "fnl", "lua"))
end
return nil

View file

@ -1,67 +0,0 @@
local _0_0
do
local name_0_ = "modules.keybinds"
local module_0_
do
local x_0_ = package.loaded[name_0_]
if ("table" == type(x_0_)) then
module_0_ = x_0_
else
module_0_ = {}
end
end
module_0_["aniseed/module"] = name_0_
module_0_["aniseed/locals"] = ((module_0_)["aniseed/locals"] or {})
module_0_["aniseed/local-fns"] = ((module_0_)["aniseed/local-fns"] or {})
package.loaded[name_0_] = module_0_
_0_0 = module_0_
end
local autoload = (require("aniseed.autoload")).autoload
local function _1_(...)
local ok_3f_0_, val_0_ = nil, nil
local function _1_()
return {require("aniseed.nvim"), require("utils"), require("which-key")}
end
ok_3f_0_, val_0_ = pcall(_1_)
if ok_3f_0_ then
_0_0["aniseed/local-fns"] = {require = {nvim = "aniseed.nvim", utils = "utils", wk = "which-key"}}
return val_0_
else
return print(val_0_)
end
end
local _local_0_ = _1_(...)
local nvim = _local_0_[1]
local utils = _local_0_[2]
local wk = _local_0_[3]
local _2amodule_2a = _0_0
local _2amodule_name_2a = "modules.keybinds"
do local _ = ({nil, _0_0, nil, {{}, nil, nil, nil}})[2] end
local cmd
do
local v_0_
do
local v_0_0
local function cmd0(s, desc)
return {("<cmd>" .. s .. "<cr>"), desc}
end
v_0_0 = cmd0
_0_0["cmd"] = v_0_0
v_0_ = v_0_0
end
local t_0_ = (_0_0)["aniseed/locals"]
t_0_["cmd"] = v_0_
cmd = v_0_
end
nvim.command("let g:mapleader = \"\\<Space>\"")
utils.keymap("i", "<C-Space>", "compe#complete()", {expr = true})
utils.keymap("i", "<Esc>", "compe#close('<Esc>')", {expr = true})
utils.keymap("i", "kj", "<Esc>")
utils.keymap("v", "<", "<gv")
utils.keymap("v", ">", ">gv")
utils.keymap("n", "<C-h>", "<C-w>h")
utils.keymap("n", "<C-j>", "<C-w>j")
utils.keymap("n", "<C-k>", "<C-w>k")
utils.keymap("n", "<C-l>", "<C-w>l")
wk.setup({})
return wk.register({[":"] = cmd("Telescope commands", "search commands"), ["<Space>"] = cmd("Telescope find_files", "find file"), b = cmd("Telescope buffers", "select buffer"), l = {name = "+lsp"}, r = cmd("Telescope live_grep", "ripgrep"), t = {g = cmd("Goyo", "goyo"), i = cmd("IndentGuidesToggle", "indent guides"), l = cmd("Limelight!!", "limelight"), name = "+toggle", r = cmd("RainbowParentheses!!", "rainbow parens")}, w = cmd("w", "save file")}, {prefix = "<Leader>"})

View file

@ -1,59 +0,0 @@
local _0_0
do
local name_0_ = "modules.looks"
local module_0_
do
local x_0_ = package.loaded[name_0_]
if ("table" == type(x_0_)) then
module_0_ = x_0_
else
module_0_ = {}
end
end
module_0_["aniseed/module"] = name_0_
module_0_["aniseed/locals"] = ((module_0_)["aniseed/locals"] or {})
module_0_["aniseed/local-fns"] = ((module_0_)["aniseed/local-fns"] or {})
package.loaded[name_0_] = module_0_
_0_0 = module_0_
end
local autoload = (require("aniseed.autoload")).autoload
local function _1_(...)
local ok_3f_0_, val_0_ = nil, nil
local function _1_()
return {require("aniseed.nvim"), require("utils")}
end
ok_3f_0_, val_0_ = pcall(_1_)
if ok_3f_0_ then
_0_0["aniseed/local-fns"] = {require = {nvim = "aniseed.nvim", utils = "utils"}}
return val_0_
else
return print(val_0_)
end
end
local _local_0_ = _1_(...)
local nvim = _local_0_[1]
local utils = _local_0_[2]
local _2amodule_2a = _0_0
local _2amodule_name_2a = "modules.looks"
do local _ = ({nil, _0_0, nil, {{}, nil, nil, nil}})[2] end
local colors
do
local v_0_
do
local v_0_0 = {bright = {black = "#002b36", blue = "#839496", cyan = "#93a1a1", green = "#586e75", magenta = "#6c71c4", red = "#cb4b16", white = "#fdf6e3", yellow = "#657b83"}, normal = {black = "#07e642", blue = "#268bd2", cyan = "#2aa198", green = "#859900", magenta = "#d33682", red = "#dc322f", white = "#eee8d5", yellow = "#b58900"}, primary = {background = "#fdf6e3", foreground = "#586e75"}}
_0_0["colors"] = v_0_0
v_0_ = v_0_0
end
local t_0_ = (_0_0)["aniseed/locals"]
t_0_["colors"] = v_0_
colors = v_0_
end
nvim.o.termguicolors = true
nvim.o.background = "light"
nvim.g.lightline = {colorscheme = "solarized"}
nvim.o.fillchars = (nvim.o.fillchars .. "vert:\226\148\130")
nvim.command("colorscheme NeoSolarized")
utils.highlight("Comment", {gui = "italic"})
utils.highlight("ExtraWhitespace", {bg = colors.normal.red})
nvim.command("match ExtraWhitespace /\\s\\+$/")
return utils.highlight({"LineNr", "SignColumn", "VertSplits"}, {bg = colors.primary.background})

View file

@ -1,36 +0,0 @@
local _0_0
do
local name_0_ = "modules.lsp"
local module_0_
do
local x_0_ = package.loaded[name_0_]
if ("table" == type(x_0_)) then
module_0_ = x_0_
else
module_0_ = {}
end
end
module_0_["aniseed/module"] = name_0_
module_0_["aniseed/locals"] = ((module_0_)["aniseed/locals"] or {})
module_0_["aniseed/local-fns"] = ((module_0_)["aniseed/local-fns"] or {})
package.loaded[name_0_] = module_0_
_0_0 = module_0_
end
local autoload = (require("aniseed.autoload")).autoload
local function _1_(...)
local ok_3f_0_, val_0_ = nil, nil
local function _1_()
return {}
end
ok_3f_0_, val_0_ = pcall(_1_)
if ok_3f_0_ then
_0_0["aniseed/local-fns"] = {}
return val_0_
else
return print(val_0_)
end
end
local _local_0_ = _1_(...)
local _2amodule_2a = _0_0
local _2amodule_name_2a = "modules.lsp"
return ({nil, _0_0, nil, {{}, nil, nil, nil}})[2]

View file

@ -1,69 +0,0 @@
local _0_0
do
local name_0_ = "modules.options"
local module_0_
do
local x_0_ = package.loaded[name_0_]
if ("table" == type(x_0_)) then
module_0_ = x_0_
else
module_0_ = {}
end
end
module_0_["aniseed/module"] = name_0_
module_0_["aniseed/locals"] = ((module_0_)["aniseed/locals"] or {})
module_0_["aniseed/local-fns"] = ((module_0_)["aniseed/local-fns"] or {})
package.loaded[name_0_] = module_0_
_0_0 = module_0_
end
local autoload = (require("aniseed.autoload")).autoload
local function _1_(...)
local ok_3f_0_, val_0_ = nil, nil
local function _1_()
return {require("aniseed.nvim")}
end
ok_3f_0_, val_0_ = pcall(_1_)
if ok_3f_0_ then
_0_0["aniseed/local-fns"] = {require = {nvim = "aniseed.nvim"}}
return val_0_
else
return print(val_0_)
end
end
local _local_0_ = _1_(...)
local nvim = _local_0_[1]
local _2amodule_2a = _0_0
local _2amodule_name_2a = "modules.options"
do local _ = ({nil, _0_0, nil, {{}, nil, nil, nil}})[2] end
nvim.o.mouse = "a"
nvim.o.undodir = (nvim.env.XDG_CACHE_HOME .. "/vim-undodir")
nvim.o.undofile = true
nvim.o.shortmess = (nvim.o.shortmess .. "c")
nvim.o.hidden = true
nvim.o.encoding = "utf-8"
nvim.o.hlsearch = true
nvim.o.incsearch = true
nvim.o.inccommand = "nosplit"
nvim.o.ignorecase = true
nvim.o.smartcase = true
nvim.o.completeopt = "longest,menuone,preview"
nvim.o.laststatus = 2
nvim.o.lazyredraw = true
nvim.o.splitbelow = true
nvim.o.splitright = true
nvim.o.matchtime = 2
nvim.o.showmatch = true
nvim.o.wrap = false
nvim.o.writebackup = false
nvim.o.showmode = false
nvim.o.updatetime = 250
nvim.o.signcolumn = "yes"
nvim.o.shiftwidth = 4
nvim.o.tabstop = 4
nvim.o.backspace = "indent,eol,start"
nvim.o.shiftround = true
nvim.o.autoindent = true
nvim.o.smartindent = true
nvim.o.expandtab = true
nvim.wo.cursorline = true
return nil

View file

@ -1,38 +0,0 @@
local _0_0
do
local name_0_ = "modules.plugins.singify"
local module_0_
do
local x_0_ = package.loaded[name_0_]
if ("table" == type(x_0_)) then
module_0_ = x_0_
else
module_0_ = {}
end
end
module_0_["aniseed/module"] = name_0_
module_0_["aniseed/locals"] = ((module_0_)["aniseed/locals"] or {})
module_0_["aniseed/local-fns"] = ((module_0_)["aniseed/local-fns"] or {})
package.loaded[name_0_] = module_0_
_0_0 = module_0_
end
local autoload = (require("aniseed.autoload")).autoload
local function _1_(...)
local ok_3f_0_, val_0_ = nil, nil
local function _1_()
return {require("gitsigns")}
end
ok_3f_0_, val_0_ = pcall(_1_)
if ok_3f_0_ then
_0_0["aniseed/local-fns"] = {require = {gitsigns = "gitsigns"}}
return val_0_
else
return print(val_0_)
end
end
local _local_0_ = _1_(...)
local gitsigns = _local_0_[1]
local _2amodule_2a = _0_0
local _2amodule_name_2a = "modules.plugins.singify"
do local _ = ({nil, _0_0, nil, {{}, nil, nil, nil}})[2] end
return gitsigns.setup()

View file

@ -1,39 +0,0 @@
local _0_0
do
local name_0_ = "modules.plugins.telescope"
local module_0_
do
local x_0_ = package.loaded[name_0_]
if ("table" == type(x_0_)) then
module_0_ = x_0_
else
module_0_ = {}
end
end
module_0_["aniseed/module"] = name_0_
module_0_["aniseed/locals"] = ((module_0_)["aniseed/locals"] or {})
module_0_["aniseed/local-fns"] = ((module_0_)["aniseed/local-fns"] or {})
package.loaded[name_0_] = module_0_
_0_0 = module_0_
end
local autoload = (require("aniseed.autoload")).autoload
local function _1_(...)
local ok_3f_0_, val_0_ = nil, nil
local function _1_()
return {require("telescope.actions"), require("telescope")}
end
ok_3f_0_, val_0_ = pcall(_1_)
if ok_3f_0_ then
_0_0["aniseed/local-fns"] = {require = {actions = "telescope.actions", telescope = "telescope"}}
return val_0_
else
return print(val_0_)
end
end
local _local_0_ = _1_(...)
local actions = _local_0_[1]
local telescope = _local_0_[2]
local _2amodule_2a = _0_0
local _2amodule_name_2a = "modules.plugins.telescope"
do local _ = ({nil, _0_0, nil, {{}, nil, nil, nil}})[2] end
return telescope.setup({defaults = {mappings = {i = {["<Esc>"] = actions.close}}}})

View file

@ -1,159 +0,0 @@
local _0_0
do
local name_0_ = "utils"
local module_0_
do
local x_0_ = package.loaded[name_0_]
if ("table" == type(x_0_)) then
module_0_ = x_0_
else
module_0_ = {}
end
end
module_0_["aniseed/module"] = name_0_
module_0_["aniseed/locals"] = ((module_0_)["aniseed/locals"] or {})
module_0_["aniseed/local-fns"] = ((module_0_)["aniseed/local-fns"] or {})
package.loaded[name_0_] = module_0_
_0_0 = module_0_
end
local autoload = (require("aniseed.autoload")).autoload
local function _1_(...)
local ok_3f_0_, val_0_ = nil, nil
local function _1_()
return {require("aniseed.core"), require("aniseed.nvim")}
end
ok_3f_0_, val_0_ = pcall(_1_)
if ok_3f_0_ then
_0_0["aniseed/local-fns"] = {require = {a = "aniseed.core", nvim = "aniseed.nvim"}}
return val_0_
else
return print(val_0_)
end
end
local _local_0_ = _1_(...)
local a = _local_0_[1]
local nvim = _local_0_[2]
local _2amodule_2a = _0_0
local _2amodule_name_2a = "utils"
do local _ = ({nil, _0_0, nil, {{}, nil, nil, nil}})[2] end
local contains_3f
do
local v_0_
do
local v_0_0
local function contains_3f0(list, elem)
local function _2_(_241)
return (elem == _241)
end
do local _ = a.some(_2_, list) end
return false
end
v_0_0 = contains_3f0
_0_0["contains?"] = v_0_0
v_0_ = v_0_0
end
local t_0_ = (_0_0)["aniseed/locals"]
t_0_["contains?"] = v_0_
contains_3f = v_0_
end
local filter_table
do
local v_0_
do
local v_0_0
local function filter_table0(f, t)
local tbl_0_ = {}
for k, v in pairs(t) do
local _2_0, _3_0 = nil, nil
if f(k, v) then
_2_0, _3_0 = k, v
else
_2_0, _3_0 = nil
end
if ((nil ~= _2_0) and (nil ~= _3_0)) then
local k_0_ = _2_0
local v_0_1 = _3_0
tbl_0_[k_0_] = v_0_1
end
end
return tbl_0_
end
v_0_0 = filter_table0
_0_0["filter-table"] = v_0_0
v_0_ = v_0_0
end
local t_0_ = (_0_0)["aniseed/locals"]
t_0_["filter-table"] = v_0_
filter_table = v_0_
end
local without_keys
do
local v_0_
do
local v_0_0
local function without_keys0(keys, t)
local function _2_(_241)
return not contains_3f(keys, _241)
end
return filter_table(_2_, t)
end
v_0_0 = without_keys0
_0_0["without-keys"] = v_0_0
v_0_ = v_0_0
end
local t_0_ = (_0_0)["aniseed/locals"]
t_0_["without-keys"] = v_0_
without_keys = v_0_
end
local keymap
do
local v_0_
do
local v_0_0
local function keymap0(mode, from, to, _3fopts)
local full_opts = without_keys({"buffer"}, a.merge({noremap = true, silent = true}, (_3fopts or {})))
local function _2_()
local res_0_ = (_3fopts).buffer
return (res_0_ and res_0_)
end
if (_3fopts and _2_()) then
return nvim.buf_set_keymap(0, mode, from, to, full_opts)
else
return nvim.set_keymap(mode, from, to, full_opts)
end
end
v_0_0 = keymap0
_0_0["keymap"] = v_0_0
v_0_ = v_0_0
end
local t_0_ = (_0_0)["aniseed/locals"]
t_0_["keymap"] = v_0_
keymap = v_0_
end
local highlight
do
local v_0_
do
local v_0_0
local function highlight0(groups, colset)
local groups0
if a["string?"](groups) then
groups0 = {groups}
else
groups0 = groups
end
local opts = a.merge({bg = "NONE", fg = "NONE", gui = "NONE"}, colset)
for _, group in ipairs(groups0) do
nvim.command(("hi!" .. group .. " guifg='" .. opts.fg .. "' guibg='" .. opts.bg .. "' gui='" .. opts.gui .. "'"))
end
return nil
end
v_0_0 = highlight0
_0_0["highlight"] = v_0_0
v_0_ = v_0_0
end
local t_0_ = (_0_0)["aniseed/locals"]
t_0_["highlight"] = v_0_
highlight = v_0_
end
return nil