procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Eli Zaretskii 2023-08-03 17:04:41 +03:00
parent 588a0363d9
commit f23cfe3933
1 changed files with 0 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
test/lisp/uniquify-tests.el
View file

@ -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)