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): print!: don't resolve printed symlinks

Browse Source
This commit is contained in:
Henrik Lissner
2024-06-22 18:06:52 -04:00
parent 703173a6d2
commit 7e7d8ebdfd
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/lib/print.el
View File

@ -92,8 +92,8 @@ and `format!' into colored output, where COLOR is any car of this list (or
(not (stringp str))
(string-blank-p str))
str
(let ((dir (or dir (file-truename default-directory)))
(str (file-truename str)))
(let* ((dir (or dir default-directory))
(str (expand-file-name str dir)))
(if (file-in-directory-p str dir)
(file-relative-name str dir)
(abbreviate-file-name str))))))