diff options
author | Gustaf Rydholm <gustaf.rydholm@gmail.com> | 2022-08-20 01:14:51 +0200 |
---|---|---|
committer | Gustaf Rydholm <gustaf.rydholm@gmail.com> | 2022-08-20 01:14:51 +0200 |
commit | 0a5364f353dd1e72629c0f1272b5c9dab501ca6b (patch) | |
tree | a4ad091bf4315844117df85b80a291fbceebbc3b | |
parent | 44f7583347bff22f17fba3eaedef0632a6d9adf9 (diff) |
Remove unused opts in comment
-rw-r--r-- | fnl/config/comment.fnl | 19 |
1 files changed, 1 insertions, 18 deletions
diff --git a/fnl/config/comment.fnl b/fnl/config/comment.fnl index d4256fe..a6e9c5f 100644 --- a/fnl/config/comment.fnl +++ b/fnl/config/comment.fnl @@ -1,23 +1,6 @@ ;; Language aware commenting. (module config.comment {autoload {: 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)}))) - -(def- opts {:pre_hook (fn [ctx] - (pre-hook ctx))}) +(def- opts {}) (util.use-config :Comment opts) |