comparison .chezmoitemplates/au.lua @ 460:ae7e377bced8

Add autocmd wrapper for lua
author zegervdv <zegervdv@me.com>
date Sun, 19 Sep 2021 14:57:14 +0200
parents
children 1635e29e0ed4
comparison
equal deleted inserted replaced
459:43262db8ecf6 460:ae7e377bced8
1 --
2 -- Copied from https://gist.github.com/numToStr/1ab83dd2e919de9235f9f774ef8076da
3 --
4 local cmd = vim.api.nvim_command
5
6 local function autocmd(this, event, spec)
7 local is_table = type(spec) == 'table'
8 local pattern = is_table and spec[1] or '*'
9 local action = is_table and spec[2] or spec
10 if type(action) == 'function' then
11 action = this.set(action)
12 end
13 local e = type(event) == 'table' and table.concat(event, ',') or event
14 cmd('autocmd ' .. e .. ' ' .. pattern .. ' ' .. action)
15 end
16
17 local S = {
18 __au = {},
19 }
20
21 local X = setmetatable({}, {
22 __index = S,
23 __newindex = autocmd,
24 __call = autocmd,
25 })
26
27 function S.exec(id)
28 S.__au[id]()
29 end
30
31 function S.set(fn)
32 local id = string.format('%p', fn)
33 S.__au[id] = fn
34 return string.format('lua require("au").exec("%s")', id)
35 end
36
37 function S.group(grp, cmds)
38 cmd('augroup ' .. grp)
39 cmd 'autocmd!'
40 if type(cmds) == 'function' then
41 cmds(X)
42 else
43 for _, au in ipairs(cmds) do
44 autocmd(S, au[1], { au[2], au[3] })
45 end
46 end
47 cmd 'augroup END'
48 end
49
50 return X