nvim: rework mixed-table macro

I didn't like that you couldn't keep mixing and matching, so I made it
so you can.
In the process, I also implemented even?, odd?, filter, mapcat, flat,
and concat.

Some of them didn't end up needing to exist, and the entire :toast.
namespace does need to be cleaned up.
Then again, it's not like I'm selling this like an alternative stdlib.
I should really try and port all of clojure.core though, it'd be funny.

3 files changed, 7 insertions, 7 deletions

diff --git a/dot_config/nvim/lua/plugins/flash.lua b/dot_config/nvim/lua/plugins/flash.lua
index ad4203e..3a8feea 100644
--- a/dot_config/nvim/lua/plugins/flash.lua
+++ b/dot_config/nvim/lua/plugins/flash.lua
@@ -1,17 +1,17 @@
 -- [nfnl] Compiled from fnl/plugins/flash.fnl by https://github.com/Olical/nfnl, do not edit.
 local function _1_()
-  return (require("flash")).jump()
+  return require("flash").jump()
 end
 local function _2_()
-  return (require("flash")).treesitter()
+  return require("flash").treesitter()
 end
 local function _3_()
-  return (require("flash")).remote()
+  return require("flash").remote()
 end
 local function _4_()
-  return (require("flash")).treesitter_search()
+  return require("flash").treesitter_search()
 end
 local function _5_()
-  return (require("flash")).toggle()
+  return require("flash").toggle()
 end
 return {{"folke/flash.nvim", event = "VeryLazy", keys = {{"s", _1_, desc = "Flash", mode = {"n", "x", "o"}}, {"S", _2_, desc = "Flash Treesitter", mode = {"n", "x", "o"}}, {"r", _3_, desc = "Remote Flash", mode = "o"}, {"R", _4_, desc = "Flash Treesitter Search", mode = {"o", "x"}}, {"<c-s>", _5_, desc = "Toggle Flash Search", mode = "c"}}, opts = {modes = {search = {enabled = false}}}}}
diff --git a/dot_config/nvim/lua/plugins/os/init.lua b/dot_config/nvim/lua/plugins/os/init.lua
index c9b9cab..3cb9f52 100644
--- a/dot_config/nvim/lua/plugins/os/init.lua
+++ b/dot_config/nvim/lua/plugins/os/init.lua
@@ -1,2 +1,2 @@
 -- [nfnl] Compiled from fnl/plugins/os/init.fnl by https://github.com/Olical/nfnl, do not edit.
-return require(("plugins.os." .. (jit.os):lower()))
+return require(("plugins.os." .. jit.os:lower()))
diff --git a/dot_config/nvim/lua/plugins/telescope.lua b/dot_config/nvim/lua/plugins/telescope.lua
index 683bdd7..f406c03 100644
--- a/dot_config/nvim/lua/plugins/telescope.lua
+++ b/dot_config/nvim/lua/plugins/telescope.lua
@@ -1,7 +1,7 @@
 -- [nfnl] Compiled from fnl/plugins/telescope.fnl by https://github.com/Olical/nfnl, do not edit.
 local function gen(key, fun, desc)
   local function _1_()
-    return (require("telescope.builtin"))[fun]()
+    return require("telescope.builtin")[fun]()
   end
   return {("<leader>f" .. key), _1_, desc = desc}
 end