diff options
author | Nicolas Graner <nicolas@graner.name> | 2022-11-02 22:28:45 +0100 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2022-11-10 11:45:40 +0200 |
commit | abbb0faceaedea5369eba68c43e0b19dc861810f (patch) | |
tree | 4218539076980bfc07a08417dc5c56981e02b245 /lisp/net | |
parent | 0047bdeb3393d5d7acbdffd7444370fc3e4d2384 (diff) | |
download | emacs-abbb0faceaedea5369eba68c43e0b19dc861810f.tar.gz emacs-abbb0faceaedea5369eba68c43e0b19dc861810f.tar.bz2 emacs-abbb0faceaedea5369eba68c43e0b19dc861810f.zip |
Better support for 'textarea' and 'select' tags in EWW
* lisp/net/eww.el (eww-tag-textarea, eww-tag-select): Don't miss
'textarea' and 'select' tags. (Bug#58973)
Diffstat (limited to 'lisp/net')
-rw-r--r-- | lisp/net/eww.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 414de931c4a..3799ef96e84 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el @@ -1596,7 +1596,8 @@ See URL `https://developer.mozilla.org/en-US/docs/Web/HTML/Element/Input'.") (list :eww-form eww-form :value value :type "textarea" - :name (dom-attr dom 'name))))) + :name (dom-attr dom 'name))) + (put-text-property start (1+ start) 'shr-tab-stop t))) (defun eww-tag-input (dom) (let ((type (downcase (or (dom-attr dom 'type) "text"))) @@ -1660,7 +1661,8 @@ See URL `https://developer.mozilla.org/en-US/docs/Web/HTML/Element/Input'.") (add-face-text-property start (point) 'eww-form-select) (put-text-property start (point) 'keymap eww-select-map) (unless (= start (point)) - (put-text-property start (1+ start) 'help-echo "select field")) + (put-text-property start (1+ start) 'help-echo "select field") + (put-text-property start (1+ start) 'shr-tab-stop t)) (shr-ensure-paragraph)))) (defun eww-select-display (select) |