awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

fix(lib): doom-info symlink-path

Browse Source 
The `if` clauses were swapped, such that a non-symlinked path was shown
like,

  ~/.config/emacs/ -> ~/.config/emacs/

and a symlinked path was shown as,

  ~/.config/emacs/
This commit is contained in:
ivanbrennan
2022-09-25 11:14:50 -04:00
committed by Henrik Lissner
parent 2645ed491b
commit 2bb7e8d018
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/lib/debug.el
View File

@ -246,8 +246,9 @@ ready to be pasted in a bug report on github."
(abbreviate-file-name path))) (abbreviate-file-name path)))
(defun symlink-path (file) (defun symlink-path (file)
(format "%s%s" (abbrev-path file) (format "%s%s" (abbrev-path file)
(if (file-symlink-p file) "" (if (file-symlink-p file)
(concat " -> " (abbrev-path (file-truename file))))))) (concat " -> " (abbrev-path (file-truename file)))
""))))
`((generated . ,(format-time-string "%b %d, %Y %H:%M:%S")) `((generated . ,(format-time-string "%b %d, %Y %H:%M:%S"))
(system . ,(delq (system . ,(delq
nil (list (doom-system-distro-version) nil (list (doom-system-distro-version)