diff options
author | aktersnurra <grydholm@kth.se> | 2022-04-30 18:42:38 +0200 |
---|---|---|
committer | aktersnurra <grydholm@kth.se> | 2022-04-30 18:42:38 +0200 |
commit | a07cea1de3f964da245874fb2f18969df6ef4ce6 (patch) | |
tree | 34649b5fceda79956dd8c3669c42dff92dc91131 /fnl/config/comment.fnl | |
parent | 383ee874e7e9ebf6126dd18abad14611de99e4c9 (diff) |
fix: renmae ncomment
Diffstat (limited to 'fnl/config/comment.fnl')
-rw-r--r-- | fnl/config/comment.fnl | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/fnl/config/comment.fnl b/fnl/config/comment.fnl new file mode 100644 index 0000000..92df966 --- /dev/null +++ b/fnl/config/comment.fnl @@ -0,0 +1,28 @@ +;; Language aware commenting. +(module config.comment + {autoload {util util}}) + +(defn- get-type [ctx U] + (if (= ctx.ctype U.ctype.line) + :__default + :__multiline)) + +(defn- get-location [ctx U] + (let [utils (require :ts_context_commentstring.utils)] + (if (= ctx.ctype U.ctype.block) + (utils.get_cursor_location) + (or (= ctx.cmotion U.cmotion.v) (= ctx.cmotion U.cmotion.V)) + (utils.get_visual_start_location) + nil))) + +(defn- pre-hook [ctx] + (let [U (require :Comment.utils) + internal (require :ts_context_commentstring.internal)] + (internal.calculate_commentstring + {:key (get-type ctx U) + :location (get-location ctx U)}))) + +(let [nvim-comment (util.load-plugin :Comment)] + (nvim-comment.setup + {:pre_hook (fn [ctx] + (pre-hook ctx))})) |