Commit 9822de72 authored by Lars Magne Ingebrigtsen's avatar Lars Magne Ingebrigtsen Committed by Katsumi Yamaoka
Browse files

lisp/gnus/eww.el (eww-tag-input): Support <input type=image>

parent c048c022
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
(eww-convert-widgets): Don't bug out if the first widget starts at the (eww-convert-widgets): Don't bug out if the first widget starts at the
beginning of the buffer. beginning of the buffer.
(eww-convert-widgets): Fix last patch. (eww-convert-widgets): Fix last patch.
(eww-tag-input): Support <input type=image>.
   
* shr.el (shr-insert-table): Respect border-collapse: collapse. * shr.el (shr-insert-table): Respect border-collapse: collapse.
(shr-tag-base): Protect against base specs that are degenerate. (shr-tag-base): Protect against base specs that are degenerate.
......
...@@ -279,7 +279,8 @@ ...@@ -279,7 +279,8 @@
(value (cdr (assq :value cont))) (value (cdr (assq :value cont)))
(widget (widget
(cond (cond
((equal type "submit") ((or (equal type "submit")
(equal type "image"))
(list 'push-button (list 'push-button
:notify 'eww-submit :notify 'eww-submit
:name (cdr (assq :name cont)) :name (cdr (assq :name cont))
......
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