Refactor doom--recentf-file-truename-fn
This commit is contained in:
parent
62d2f27510
commit
7332a6f798
1 changed files with 4 additions and 8 deletions
|
@ -286,14 +286,10 @@ or file path may exist now."
|
|||
recentf-max-saved-items 200) ; default is 20
|
||||
|
||||
(defun doom--recentf-file-truename-fn (file)
|
||||
(if (file-remote-p file)
|
||||
(if-let* ((tfile (and (bound-and-true-p tramp-mode)
|
||||
(tramp-tramp-file-p file)
|
||||
(tramp-dissect-file-name file)))
|
||||
((string= (tramp-file-name-method tfile) "sudo")))
|
||||
(abbreviate-file-name (file-truename (tramp-file-name-localname tfile)))
|
||||
file)
|
||||
(abbreviate-file-name (file-truename file))))
|
||||
(if (or (not (file-remote-p file))
|
||||
(equal "sudo" (file-remote-p file 'method)))
|
||||
(abbreviate-file-name (file-truename (tramp-file-name-localname tfile)))
|
||||
file))
|
||||
|
||||
;; Resolve symlinks, strip out the /sudo:X@ prefix in local tramp paths, and
|
||||
;; abbreviate $HOME -> ~ in filepaths (more portable, more readable, & saves
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue