diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2022-05-14 23:34:57 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-05-15 19:31:22 -0700 |
commit | 0a6faa030ff17bab21796f88cd4edab87a5c73b8 (patch) | |
tree | e2c428904fc3d00ae990fc894aa25c8858bd905f /.emacs.d | |
parent | f7c98a939a560f84fe79467fff2be6548799cb7b (diff) | |
download | dotfiles-0a6faa030ff17bab21796f88cd4edab87a5c73b8.tar.gz |
fix M-& in dired virtual dirs
Diffstat (limited to '.emacs.d')
-rw-r--r-- | .emacs.d/init.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 8bb198cf..70a21fc6 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -1496,7 +1496,10 @@ The ideas behind these behaviours are as follows. C-x p e." (interactive "P") (require 'eshell) - (let* ((current-project (and (not (file-remote-p default-directory)) + (let* ((default-directory (or (and (eq major-mode 'dired-mode) + (dired-current-directory)) + default-directory)) + (current-project (and (not (file-remote-p default-directory)) (project-current))) (project-root (and current-project (project-root current-project))) (target-directory (expand-file-name |