diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2015-06-28 21:57:51 +0200 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2015-06-28 21:57:51 +0200 |
commit | cf1cc4519feda70fbdbf5392acc1fba640b9b5e1 (patch) | |
tree | e03a3dfa68e86b3d8624f8a83fafe3c99f0bb5e7 | |
parent | 8e7e8204a8ed0d022b93563800495c3a7a4bb1b7 (diff) |
Fix preselection in helm-find-files quick delete.
* helm-files.el (helm-ff-quick-delete): Do it.
-rw-r--r-- | helm-files.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/helm-files.el b/helm-files.el index a164265d..71ba3180 100644 --- a/helm-files.el +++ b/helm-files.el @@ -1884,7 +1884,11 @@ Note that only existing directories are saved here." (with-helm-buffer (setq helm-marked-candidates nil helm-visible-mark-overlays nil)) - (helm-force-update)))) + (helm-force-update + (let ((presel (helm-get-selection))) + (regexp-quote (if (and helm-ff-transformer-show-only-basename + (not (helm-ff-dot-file-p presel))) + (helm-basename presel) presel))))))) (defun helm-ff-kill-buffer-fname (candidate) (let ((buf (get-file-buffer candidate))) |