diff options
-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) |