Skip to content

Commit

Permalink
Apply some code review suggestions about test
Browse files Browse the repository at this point in the history
  • Loading branch information
scottming committed Sep 18, 2023
1 parent eb2af3b commit 5868129
Showing 1 changed file with 57 additions and 46 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -49,9 +49,9 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
~q[
defmodule |Foo do
end
] |> rename("Bar")
] |> rename("Renamed")

assert result =~ ~S[defmodule Bar do]
assert result =~ ~S[defmodule Renamed do]
end

test "succeeds when the cursor on the alias" do
Expand All @@ -60,9 +60,9 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
defmodule Baz do
alias |Foo
end
] |> rename("Bar")
] |> rename("Renamed")

assert result =~ ~S[alias Bar]
assert result =~ ~S[alias Renamed]
end

test "succeeds when the definition in a nested module" do
Expand All @@ -76,10 +76,18 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
defmodule TopLevelTest do
alias TopLevel.|Foo
end
] |> rename("Bar")
] |> rename("Renamed")

assert result =~ ~S[ defmodule Bar do]
assert result =~ ~S[ alias TopLevel.Bar]
assert result == ~q[
defmodule TopLevel do
defmodule Renamed do
end
end
defmodule TopLevelTest do
alias TopLevel.Renamed
end
]
end

test "succeeds when the cursor in the multiple aliases off of single alias" do
Expand All @@ -92,9 +100,9 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
}
|Second
end
] |> rename("Bar")
] |> rename("Renamed")

assert result =~ ~S[ First, Bar,]
assert result =~ ~S[ First, Renamed,]
end

test "only rename the aliased when the cursor at the aliased" do
Expand All @@ -105,10 +113,10 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
|FooBar
end
]
|> rename("FooBarBar")
|> rename("Renamed")

assert result =~ ~S[alias Foo.Bar, as: FooBarBar]
assert result =~ ~S[ FooBarBar]
assert result =~ ~S[alias Foo.Bar, as: Renamed]
assert result =~ ~S[ Renamed]
end

test "succeeds when the cursor at the alias_ased child" do
Expand All @@ -122,10 +130,30 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
Parent.|Bar
end
]
|> rename("Baz")
|> rename("Renamed")

assert result =~ ~S[defmodule TopLevel.Foo.Renamed]

assert result =~ ~S[ Parent.Renamed]
end

test "only rename aliased when the cursor at the alias_ased" do
{:ok, result} =
~q[
defmodule TopLevel.Foo.Bar do
end
defmodule TopLevel.Another do
alias TopLevel.Foo, as: Parent
|Parent.Bar
end
]
|> rename("Renamed")

assert result =~ ~S[defmodule TopLevel.Foo.Baz]
assert result =~ ~S[Parent.Baz]
assert result =~ ~S[defmodule TopLevel.Foo.Bar do]

assert result =~ ~S[alias TopLevel.Foo, as: Renamed]
assert result =~ ~S[ Renamed.Bar]
end

test "shouldn't rename the relative module" do
Expand All @@ -136,7 +164,7 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
defmodule FooTest do
end
] |> rename("ShouldNotRenameTest")
] |> rename("Renamed")

assert result =~ ~S[defmodule FooTest do]
end
Expand All @@ -149,12 +177,12 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
defmodule TopLevel.Module.Another do # x
alias TopLevel.|Module
end
] |> rename("Baz")
] |> rename("Renamed")

refute result =~ ~S[defmodule TopLevel.Baz.Another]
refute result =~ ~S[defmodule TopLevel.Renamed.Another]

assert result =~ ~S[defmodule TopLevel.Baz do]
assert result =~ ~S[alias TopLevel.Baz]
assert result =~ ~S[defmodule TopLevel.Renamed do]
assert result =~ ~S[alias TopLevel.Renamed]
end
end

Expand All @@ -165,10 +193,10 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
defmodule TopLevel.|Middle.Module do
alias TopLevel.Middle.Module
end
] |> rename("Foo")
] |> rename("Renamed")

assert result =~ ~S[defmodule TopLevel.Foo.Module]
assert result =~ ~S[alias TopLevel.Foo.Module]
assert result =~ ~S[defmodule TopLevel.Renamed.Module]
assert result =~ ~S[alias TopLevel.Renamed.Module]
end

test "in the middle of reference" do
Expand All @@ -177,27 +205,10 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
defmodule TopLevel.Middle.Module do
alias TopLevel.|Middle.Module
end
] |> rename("Foo")

assert result =~ ~S[defmodule TopLevel.Foo.Module]
assert result =~ ~S[alias TopLevel.Foo.Module]
end

test "succeeds when the cursor at the alias_ased reference" do
{:ok, result} =
~q[
defmodule TopLevel.Foo.Bar do
end
] |> rename("Renamed")

defmodule TopLevel.Another do
alias TopLevel.Foo, as: Parent
|Parent.Bar
end
]
|> rename("AsedParent")

assert result =~ ~S[alias TopLevel.Foo, as: AsedParent]
assert result =~ ~S[AsedParent.Bar]
assert result =~ ~S[defmodule TopLevel.Renamed.Module]
assert result =~ ~S[alias TopLevel.Renamed.Module]
end

test "succeeds when there are same module name in the cursor neighborhood" do
Expand All @@ -212,11 +223,11 @@ defmodule Lexical.RemoteControl.CodeIntelligence.RenameTest do
defmodule TopLevel.Another do
alias TopLevel.Foo.|Foo
end
] |> rename("Bar")
] |> rename("Renamed")

assert result =~ ~S[defmodule TopLevel.Foo do]
assert result =~ ~S[defmodule TopLevel.Foo.Bar do]
assert result =~ ~S[alias TopLevel.Foo.Bar]
assert result =~ ~S[defmodule TopLevel.Foo.Renamed do]
assert result =~ ~S[alias TopLevel.Foo.Renamed]
end
end

Expand Down

0 comments on commit 5868129

Please sign in to comment.