Fix fileless eww form submission
* lisp/net/eww.el (eww-submit): Ignore file inputs with no associated file name (bug#36520).
This commit is contained in:
parent
5a0ab88cc9
commit
c6d8143453
1 changed files with 9 additions and 9 deletions
|
@ -1447,15 +1447,15 @@ See URL `https://developer.mozilla.org/en-US/docs/Web/HTML/Element/Input'.")
|
|||
(push (cons name (plist-get input :value))
|
||||
values)))
|
||||
((equal (plist-get input :type) "file")
|
||||
(push (cons "file"
|
||||
(list (cons "filedata"
|
||||
(with-temp-buffer
|
||||
(insert-file-contents
|
||||
(plist-get input :filename))
|
||||
(buffer-string)))
|
||||
(cons "name" (plist-get input :name))
|
||||
(cons "filename" (plist-get input :filename))))
|
||||
values))
|
||||
(when-let ((file (plist-get input :filename)))
|
||||
(push (list "file"
|
||||
(cons "filedata"
|
||||
(with-temp-buffer
|
||||
(insert-file-contents file)
|
||||
(buffer-string)))
|
||||
(cons "name" name)
|
||||
(cons "filename" file))
|
||||
values)))
|
||||
((equal (plist-get input :type) "submit")
|
||||
;; We want the values from buttons if we hit a button if
|
||||
;; we hit enter on it, or if it's the first button after
|
||||
|
|
Loading…
Add table
Reference in a new issue