[elpa] externals/ement 4a4662f8ca 3/9: Ask user for the filename to save to

[ELPA Syncer]

branch: externals/ement
commit 4a4662f8caee94c6b44604149f3bb1cf3639a59b
Author: Arto Jantunen <vi...@iki.fi>
Commit: Adam Porter <a...@alphapapa.net>

    Ask user for the filename to save to
---
 ement-room.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ement-room.el b/ement-room.el
index 18c2032c98..f4fe181495 100644
--- a/ement-room.el
+++ b/ement-room.el
@@ -5946,7 +5946,7 @@ For use in `completion-at-point-functions'."
                      (dir (if (stringp eww-download-directory)
                               eww-download-directory
                             (funcall eww-download-directory)))
-                     (filename (expand-file-name (file-name-nondirectory 
event-filename) dir)))
+                     (filename (expand-file-name(read-file-name "Download to: 
" (file-name-concat dir (file-name-nondirectory event-filename))))))
                  (access-file dir "Download failed")
                  (ement--media-request mxc-url session :as (list 'file 
filename)))))