emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Reduce false positive symlinks in doom/info {emacs,doom}dir

Browse source
This commit is contained in:
Henrik Lissner 2021-04-17 18:08:01 -04:00
parent 233fd93b65
commit 6e49cb5ce2
1 changed files with 3 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

7
core/autoload/debug.el
View file

@ -121,10 +121,9 @@ ready to be pasted in a bug report on github."
(regexp-opt (list (user-login-name)) 'words) "$USER" (regexp-opt (list (user-login-name)) 'words) "$USER"
(abbreviate-file-name path))) (abbreviate-file-name path)))
(defun symlink-path (file) (defun symlink-path (file)
(let ((truefile (file-truename file))) (format "%s%s" (abbrev-path file)
(format "%s%s" (abbrev-path file) (if (file-symlink-p file) ""
(if (equal file truefile) "" (concat " -> " (abbrev-path (file-truename file)))))))
(concat " -> " (abbrev-path truefile)))))))
`((generated . ,(format-time-string "%b %d, %Y %H:%M:%S")) `((generated . ,(format-time-string "%b %d, %Y %H:%M:%S"))
(distro . ,(list (doom-system-distro-version) (sh "uname" "-msr"))) (distro . ,(list (doom-system-distro-version) (sh "uname" "-msr")))
(emacs . ,(delq (emacs . ,(delq