Mirrors/exwm2
2
0
Fork 0
mirror of https://github.com/emacs-exwm/exwm.git synced 2024-11-23 13:07:59 +01:00
Code Issues Projects Releases Packages Wiki Activity

Ensure that default-directory is a directory name in EXWM buffers.

Browse source 
Otherwise `default-directory' could be /home/user instead of /home/user/ as is
expected by Emacs.

* exwm-manage.el (exwm-manage--update-default-directory): Use
`file-name-as-directory'.
This commit is contained in:
Daniel Mendler 2024-02-04 22:39:06 +01:00
parent fbc1e81ed6
commit 44e74bcc07
No known key found for this signature in database
GPG key ID: D88ADB2A2693CA43
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
exwm-manage.el
View file

@ -247,7 +247,7 @@ This only works when procfs is mounted, which may not be the case on some BSDs."
(pid (slot-value response 'value)) (pid (slot-value response 'value))
(cwd (file-symlink-p (format "/proc/%d/cwd" pid))) (cwd (file-symlink-p (format "/proc/%d/cwd" pid)))
((file-accessible-directory-p cwd))) ((file-accessible-directory-p cwd)))
(setq default-directory cwd) (setq default-directory (file-name-as-directory cwd))
(setq default-directory (expand-file-name "~/"))))) (setq default-directory (expand-file-name "~/")))))