From 99d166796f181741ebd79542b96824b096bcb36c Mon Sep 17 00:00:00 2001 From: Jonas Bernoulli Date: Sat, 15 Dec 2018 15:14:50 +0100 Subject: [PATCH] borg--drone-states: Return only last part of path again This broke in 11aadf359c when `borg-updated-drones' was replaced with `borg--drone-states'. --- borg.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/borg.el b/borg.el index 1d0d3df..b6e6000 100644 --- a/borg.el +++ b/borg.el @@ -775,7 +775,8 @@ Formatting is according to the commit message conventions." (mapcar (lambda (line) (pcase-let* ((`(,state ,module) (split-string line "\t"))) - (list module state + (list (file-name-nondirectory module) + state (and (member state '("A" "M")) (let ((default-directory (expand-file-name module))) (if (file-directory-p default-directory)