Fix ~ normalization in Path:normalize() (#279)

Co-authored-by: fenuks <fenuks>

Author: fenuks

lua/plenary/path.lua

@@ -340,7 +340,7 @@ function Path:normalize(cwd)
   self:make_relative(cwd)
 
   -- Substitute home directory w/ "~"
-  self.filename = self.filename:gsub("^" .. path.home, "~", 1)
+  self.filename = self.filename:gsub("^" .. path.home, "~" .. path.sep, 1)
 
   return _normalize_path(self.filename, self._cwd)
 end

tests/plenary/path_spec.lua

@@ -205,6 +205,22 @@ describe("Path", function()
       p._cwd = "/tmp/lua"
       assert.are.same("/tmp/lua/plenary/path.lua", p:normalize())
     end)
+
+    it("can normalize ~ when file is within home directory (traling slash)", function()
+      local home = "/home/test/"
+      local p = Path:new { home, "./test_file" }
+      p.path.home = home
+      p._cwd = "/tmp/lua"
+      assert.are.same("~/./test_file", p:normalize())
+    end)
+
+    it("can normalize ~ when file is within home directory (no trailing slash)", function()
+      local home = "/home/test"
+      local p = Path:new { home, "./test_file" }
+      p.path.home = home
+      p._cwd = "/tmp/lua"
+      assert.are.same("~//./test_file", p:normalize())
+    end)
   end)
 
   describe(":shorten", function()