Commit c6d81434 authored by Basil L. Contovounesios's avatar Basil L. Contovounesios Committed by Lars Ingebrigtsen

Fix fileless eww form submission

* lisp/net/eww.el (eww-submit): Ignore file inputs with no
associated file name (bug#36520).
parent 5a0ab88c
Pipeline #3130 failed with stage
in 90 minutes and 1 second
......@@ -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
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment