branch: elpa/magit
commit 492ef97c3f06232121139534aca3e6dc7f1d3a89
Author: Steve Purcell <[email protected]>
Commit: Jonas Bernoulli <[email protected]>
magit-list-repos-uniquify: Use uniquify-separator if set
When the user has set `uniquify-separator', use
it in `magit-list-repos-uniquify' for consistency.
---
lisp/magit-repos.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lisp/magit-repos.el b/lisp/magit-repos.el
index 62b9821bc5d..1ae754b8373 100644
--- a/lisp/magit-repos.el
+++ b/lisp/magit-repos.el
@@ -535,7 +535,9 @@ instead."
(magit-list-repos-uniquify
(mapcar (lambda (v)
(cons (concat
- key "\\"
+ key
+ (or (bound-and-true-p uniquify-separator)
+ "\\")
(file-name-nondirectory
(directory-file-name
(substring v 0 (- (1+ (length key)))))))
