[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r113030: lisp/gnus/eww.el (eww-tag-input): Support <
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] trunk r113030: lisp/gnus/eww.el (eww-tag-input): Support <input type=image> |
Date: |
Mon, 17 Jun 2013 23:11:46 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 113030
revision-id: address@hidden
parent: address@hidden
author: Lars Magne Ingebrigtsen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Mon 2013-06-17 23:11:40 +0000
message:
lisp/gnus/eww.el (eww-tag-input): Support <input type=image>
modified:
lisp/gnus/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1433
lisp/gnus/eww.el eww.el-20130610114603-80ap3gwnw4x4m5ix-1
=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog 2013-06-17 22:06:27 +0000
+++ b/lisp/gnus/ChangeLog 2013-06-17 23:11:40 +0000
@@ -4,6 +4,7 @@
(eww-convert-widgets): Don't bug out if the first widget starts at the
beginning of the buffer.
(eww-convert-widgets): Fix last patch.
+ (eww-tag-input): Support <input type=image>.
* shr.el (shr-insert-table): Respect border-collapse: collapse.
(shr-tag-base): Protect against base specs that are degenerate.
=== modified file 'lisp/gnus/eww.el'
--- a/lisp/gnus/eww.el 2013-06-17 22:06:27 +0000
+++ b/lisp/gnus/eww.el 2013-06-17 23:11:40 +0000
@@ -279,7 +279,8 @@
(value (cdr (assq :value cont)))
(widget
(cond
- ((equal type "submit")
+ ((or (equal type "submit")
+ (equal type "image"))
(list 'push-button
:notify 'eww-submit
:name (cdr (assq :name cont))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r113030: lisp/gnus/eww.el (eww-tag-input): Support <input type=image>,
Katsumi Yamaoka <=