branch: externals/filechooser commit 62a9ef588331b06c818ea5db5a73e756f20fd13d Author: Rahguzar <rahgu...@zohomail.eu> Commit: Rahguzar <rahgu...@zohomail.eu>
Remap abort-minibuffers too Otherwise canceling selection never returns a value to dbus. --- filechooser.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/filechooser.el b/filechooser.el index b046f73324..1bc9e3bee4 100644 --- a/filechooser.el +++ b/filechooser.el @@ -5,7 +5,7 @@ ;; Author: rahguzar <rahgu...@zohomail.eu> ;; Maintainer: rahguzar <rahgu...@zohomail.eu> ;; Created: May 20, 2023 -;; Version: 0.2.0 +;; Version: 0.2.1 ;; Keywords: convenience files tools unix ;; Homepage: https://codeberg.org/rahguzar/filechooser ;; Package-Requires: ((emacs "28.1") (compat "29.1")) @@ -36,7 +36,8 @@ (defvar-keymap filechooser-mininuffer-map "C-f" #'filechooser-toggle-filter - "<remap> <abort-recursive-edit>" #'filechooser-abort) + "<remap> <abort-recursive-edit>" #'filechooser-abort + "<remap> <abort-minibuffers>" #'filechooser-abort) (defvar-keymap filechooser-multiple-selection-map :parent filechooser-mininuffer-map @@ -267,8 +268,7 @@ See Info node `(elisp) Programmed Completion' for STR, PRED and ACTION." (defun filechooser--read-file-name-1 (prompt &optional mustmatch dir default) "Read a filename with PROMPT and predicate made from active filters. -MUSTMATCH and DIR are as in `read-file-name'. DEFAULT is the default filename. -If MULTIPLE is non-nil `completing-read-multiple' is used." +MUSTMATCH and DIR are as in `read-file-name'. DEFAULT is the default filename." (catch 'continue (minibuffer-with-setup-hook (lambda () (use-local-map (make-composed-keymap filechooser-mininuffer-map