Add integration tests

test/next_ls/alias_test.exs

@@ -0,0 +1,91 @@
+defmodule NextLS.PipeTest do
+  use ExUnit.Case, async: true
+
+  import GenLSP.Test
+  import NextLS.Support.Utils
+
+  @moduletag :tmp_dir
+  @moduletag root_paths: ["my_proj"]
+
+  setup %{tmp_dir: tmp_dir} do
+    File.mkdir_p!(Path.join(tmp_dir, "my_proj/lib"))
+    File.write!(Path.join(tmp_dir, "my_proj/mix.exs"), mix_exs())
+
+    cwd = Path.join(tmp_dir, "my_proj")
+
+    foo_path = Path.join(cwd, "lib/foo.ex")
+
+    foo = """
+    defmodule Foo do
+      def to_list() do
+        Foo.Bar.to_list(Map.new())
+      end
+
+      def to_map() do
+        Foo.Bar.to_map(List.new())
+      end
+    end
+    """
+
+    File.write!(foo_path, foo)
+
+    [foo: foo, foo_path: foo_path]
+  end
+
+  setup :with_lsp
+
+  setup context do
+    assert :ok == notify(context.client, %{method: "initialized", jsonrpc: "2.0", params: %{}})
+    assert_is_ready(context, "my_proj")
+    assert_compiled(context, "my_proj")
+    assert_notification "$/progress", %{"value" => %{"kind" => "end", "message" => "Finished indexing!"}}
+
+    did_open(context.client, context.foo_path, context.foo)
+    context
+  end
+
+  test "refactors with alias", %{client: client, foo_path: foo} do
+    foo_uri = uri(foo)
+    id = 1
+
+    request client, %{
+      method: "workspace/executeCommand",
+      id: id,
+      jsonrpc: "2.0",
+      params: %{
+        command: "alias-refactor",
+        arguments: [%{uri: foo_uri, position: %{line: 2, character: 8}}]
+      }
+    }
+
+    expected_edit = """
+    defmodule Foo do
+      alias Foo.Bar
+
+      def to_list() do
+        Bar.to_list(Map.new())
+      end
+
+      def to_map() do
+        Bar.to_map(List.new())
+      end
+    end
+    """
+    |> String.trim()
+
+    assert_request(client, "workspace/applyEdit", 500, fn params ->
+      assert %{"edit" => edit, "label" => "Pipe"} = params
+
+      assert %{
+               "changes" => %{
+                 ^foo_uri => [%{"newText" => text, "range" => range}]
+               }
+             } = edit
+
+      assert text == expected_edit
+
+      assert range["start"] == %{"character" => 0, "line" => 0}
+      assert range["end"] == %{"character" => 3, "line" => 8}
+    end)
+  end
+end

test/next_ls/helpers/ast_helpers_test.exs

@@ -108,5 +108,15 @@ defmodule NextLS.ASTHelpersTest do
       position = %Position{line: 0, character: 0}
       assert {:ok, {:defmodule, _, [{:__aliases__, _, [:Test]} | _]}} = ASTHelpers.get_nearest_module(ast, position)
     end
+
+    test "errors out when it can't find a module" do
+      {:ok, ast} =
+        Spitfire.parse("""
+        def foo, do: :bar
+        """)
+
+      position = %Position{line: 0, character: 0}
+      assert {:error, "no defmodule definition"} = ASTHelpers.get_nearest_module(ast, position)
+    end
   end
 end