From: Eli Zaretskii <eliz@gnu.org>
Date: Thu, 3 Aug 2023 14:04:41 +0000 (+0300)
Subject: ; * test/lisp/uniquify-tests.el (uniquify-home): Delete (bug#62621).
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f23cfe3933abcdec44d46c86e4ac3219fa1b5631;p=emacs.git

; * test/lisp/uniquify-tests.el (uniquify-home): Delete (bug#62621).
---

diff --git a/test/lisp/uniquify-tests.el b/test/lisp/uniquify-tests.el
index 224991cb048..38510c3bd77 100644
--- a/test/lisp/uniquify-tests.el
+++ b/test/lisp/uniquify-tests.el
@@ -89,21 +89,6 @@
                          '("a/dir/" "b/dir/")))
           (mapc #'kill-buffer bufs))))))
 
-(ert-deftest uniquify-home ()
-  "uniquify works, albeit confusingly, in the presence of directories named \"~\""
-  (let (bufs)
-    (save-excursion
-      (push (find-file-noselect "~") bufs)
-      (push (find-file-noselect "./~") bufs)
-      (should (equal (mapcar #'buffer-name bufs)
-                     '("~<test>" "~<>")))
-      (push (find-file-noselect "~/foo") bufs)
-      (push (find-file-noselect "./~/foo") bufs)
-      (should (equal (mapcar #'buffer-name bufs)
-                     '("foo<~>" "foo</nonexistent>" "~<test>" "~<>")))
-      (while bufs
-        (kill-buffer (pop bufs))))))
-
 (ert-deftest uniquify-rename-to-dir ()
   "Giving a buffer a name which matches a directory doesn't rename the buffer"
   (let ((uniquify-buffer-name-style 'forward)