; * 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 224991cb048196b347a7184dbd1b07990d488ff1..38510c3bd77cde91f6c0e499f8d063302f5a25a0 100644 (file)
--- 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)