Do not cursor sigil after dot

2 files changed, 11 insertions, 2 deletions

diff --git a/lib/elixir/lib/code/fragment.ex b/lib/elixir/lib/code/fragment.ex
index 365bb0d53..47dc99a90 100644
--- a/lib/elixir/lib/code/fragment.ex
+++ b/lib/elixir/lib/code/fragment.ex
@@ -383,8 +383,14 @@ defmodule Code.Fragment do
     {:none, 0}
   end
 
-  defp operator(_rest, count, '~', _call_op?) do
-    {{:sigil, ''}, count}
+  defp operator(rest, count, '~', call_op?) do
+    {rest, _} = strip_spaces(rest, count)
+
+    if call_op? or match?([?. | rest] when rest == [] or hd(rest) != ?., rest) do
+      {:none, 0}
+    else
+      {{:sigil, ''}, count}
+    end
   end
 
   defp operator(rest, count, acc, _call_op?) do
diff --git a/lib/elixir/test/elixir/code_fragment_test.exs b/lib/elixir/test/elixir/code_fragment_test.exs
index 6dcf9066f..bc8d84e6a 100644
--- a/lib/elixir/test/elixir/code_fragment_test.exs
+++ b/lib/elixir/test/elixir/code_fragment_test.exs
@@ -215,6 +215,9 @@ defmodule CodeFragmentTest do
       assert CF.cursor_context("~R") == {:sigil, 'R'}
       assert CF.cursor_context("~R/") == :none
       assert CF.cursor_context("~R<") == :none
+
+      assert CF.cursor_context("Foo.~") == :none
+      assert CF.cursor_context("Foo.~ ") == :none
     end
 
     test "module attribute" do