use byte positions

ocaml · Jun 24, 2019 · a20a0e5 · a20a0e5
1 parent 6a8742a
commit a20a0e5
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/emacs/merlin.el b/emacs/merlin.el
@@ -439,7 +439,8 @@ DATA must be an assoc list with fields line and col."
      (widen)
      (goto-char point)
      (format "%d:%d" (line-number-at-pos)
-                     (- (point) (line-beginning-position))))))
+             (- (position-bytes (point))
+                (position-bytes (line-beginning-position)))))))
 
 (defun merlin--make-bounds (data)
   "From a remote merlin object DATA {\"start\": LOC1; \"end\": LOC2},