diff options
| author | Yuchen Pei <id@ypei.org> | 2023-06-26 17:19:43 +1000 |
|---|---|---|
| committer | Yuchen Pei <id@ypei.org> | 2023-06-26 17:19:43 +1000 |
| commit | 6c3fb77a11f3cf76f66de4e760de5430dad83439 (patch) | |
| tree | 750632d1287256e94f073841ad593a5b094169bd /emacs/.emacs.d/init/ycp-dired.el | |
| parent | e13c4fb1d8303affa0f64e5a5ba06e9b3b03d475 (diff) | |
Override dired-do-delete and dired-do-rename
- delete: don't move to trash with prefix arg
- rename: don't use vc with prefix arg
Diffstat (limited to 'emacs/.emacs.d/init/ycp-dired.el')
| -rw-r--r-- | emacs/.emacs.d/init/ycp-dired.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/emacs/.emacs.d/init/ycp-dired.el b/emacs/.emacs.d/init/ycp-dired.el index a0892ab..badd8ed 100644 --- a/emacs/.emacs.d/init/ycp-dired.el +++ b/emacs/.emacs.d/init/ycp-dired.el @@ -55,6 +55,8 @@ "<return>" #'my-dired-find-or-alternate "r" #'my-dired-do-rename-and-symlink-back "s" #'my-dired-toggle-sorting) + (advice-add 'dired-do-delete :around 'my-dired-do-delete) + (advice-add 'dired-do-rename :around 'my-dired-do-rename) ) ;;; dired-aux |