fix: Fix virtual text position

liquidz · Apr 7, 2024 · 9bc211e · 9bc211e
1 parent ab69a37
commit 9bc211e
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/src/elin/interceptor/evaluate.clj b/src/elin/interceptor/evaluate.clj
@@ -21,11 +21,12 @@
 (def set-eval-result-to-virtual-text-interceptor
   {:name ::set-eval-result-to-virtual-text-interceptor
    :kind e.c.interceptor/evaluate
-   :leave (-> (fn [{:component/keys [host] :keys [response]}]
+   :leave (-> (fn [{:component/keys [host] :keys [response options]}]
                 (when-let [v (:value response)]
                   (e.p.host/set-virtual-text host
                                              (str v)
-                                             {:highlight "DiffText"})))
+                                             {:lnum (:line options)
+                                              :highlight "DiffText"})))
               (ix/discard))})
 
 (defn- up-until-top [zloc]