branch: externals/gtags-mode
commit 1466890ceedb7c7a4d916f3efa4d9457aee70496
Author: Jimmy Aguilar Mena <kratsbinov...@gmail.com>
Commit: Jimmy Aguilar Mena <kratsbinov...@gmail.com>
Use file-name-as-directory for root
---
gtags-mode.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/gtags-mode.el b/gtags-mode.el
index 5ad1de27cd..e98271fe61 100644
--- a/gtags-mode.el
+++ b/gtags-mode.el
@@ -184,7 +184,8 @@ On success return a list of strings or nil if any error
occurred."
"Return dbpath for DIR or nil if none."
(when-let* ((default-directory dir)
(root (car (gtags-mode--exec-sync '("--print-dbpath")))))
- (setq root (concat (file-remote-p default-directory) root))
+ (setq root (concat (file-remote-p default-directory) ;; add remote prefix
if remote
+ (file-name-as-directory root))) ;; add a / at the end
is missing
(or (gtags-mode--get-plist root) ;; already exist
(car (push `(:gtagsroot ,root :cache nil) gtags-mode--alist)))))
