]> git.eshelyaron.com Git - emacs.git/commitdiff
Make eww render <select> elements again
authorLars Ingebrigtsen <larsi@gnus.org>
Fri, 13 Apr 2018 00:08:40 +0000 (02:08 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Fri, 13 Apr 2018 00:08:40 +0000 (02:08 +0200)
* lisp/net/eww.el (eww-tag-select): Actually render <select>
elements (bug#25703).

lisp/net/eww.el

index 9490d319226ebe5c26e06223c25cdef78bf8fe56..f225079577a9a5d126b4a37dabccaec5b2373372 100644 (file)
@@ -1241,12 +1241,7 @@ See URL `https://developer.mozilla.org/en-US/docs/Web/HTML/Element/Input'.")
        (start (point))
        (max 0)
        opelem)
-    (if (eq (dom-tag dom) 'optgroup)
-       (dolist (groupelem (dom-children dom))
-         (unless (dom-attr groupelem 'disabled)
-           (setq opelem (append opelem (list groupelem)))))
-      (setq opelem (list dom)))
-    (dolist (elem opelem)
+    (dolist (elem (dom-non-text-children dom))
       (when (eq (dom-tag elem) 'option)
        (when (dom-attr elem 'selected)
          (nconc menu (list :value (dom-attr elem 'value))))