From f23cfe3933abcdec44d46c86e4ac3219fa1b5631 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Thu, 3 Aug 2023 17:04:41 +0300 Subject: [PATCH] ; * test/lisp/uniquify-tests.el (uniquify-home): Delete (bug#62621). --- test/lisp/uniquify-tests.el | 15 --------------- 1 file changed, 15 deletions(-) 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) - '("~" "~<>"))) - (push (find-file-noselect "~/foo") bufs) - (push (find-file-noselect "./~/foo") bufs) - (should (equal (mapcar #'buffer-name bufs) - '("foo<~>" "foo" "~" "~<>"))) - (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) -- 2.39.2