diff options
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/net/eww.el | 10 |
2 files changed, 15 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1c66a806c5f..19d14f69017 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2013-12-25 Kenjiro NAKAYAMA <nakayamakenjiro@gmail.com> | ||
| 2 | |||
| 3 | * net/eww.el (eww-form-textarea): Use a different face for | ||
| 4 | textareas than text input since they have different keymaps | ||
| 5 | (bug#16142). | ||
| 6 | |||
| 1 | 2013-12-24 Fabián Ezequiel Gallina <fgallina@gnu.org> | 7 | 2013-12-24 Fabián Ezequiel Gallina <fgallina@gnu.org> |
| 2 | 8 | ||
| 3 | * progmodes/python.el (python-nav-beginning-of-statement): Speed | 9 | * progmodes/python.el (python-nav-beginning-of-statement): Speed |
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 02c93a0c677..25309d16951 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el | |||
| @@ -115,6 +115,14 @@ See also `eww-form-checkbox-selected-symbol'." | |||
| 115 | :version "24.4" | 115 | :version "24.4" |
| 116 | :group 'eww) | 116 | :group 'eww) |
| 117 | 117 | ||
| 118 | (defface eww-form-textarea | ||
| 119 | '((t (:background "#C0C0C0" | ||
| 120 | :foreground "black" | ||
| 121 | :box (:line-width 1)))) | ||
| 122 | "Face for eww textarea inputs." | ||
| 123 | :version "24.4" | ||
| 124 | :group 'eww) | ||
| 125 | |||
| 118 | (defvar eww-current-url nil) | 126 | (defvar eww-current-url nil) |
| 119 | (defvar eww-current-dom nil) | 127 | (defvar eww-current-dom nil) |
| 120 | (defvar eww-current-source nil) | 128 | (defvar eww-current-source nil) |
| @@ -776,7 +784,7 @@ See URL `https://developer.mozilla.org/en-US/docs/Web/HTML/Element/Input'.") | |||
| 776 | (when (> pad 0) | 784 | (when (> pad 0) |
| 777 | (insert (make-string pad ? )))) | 785 | (insert (make-string pad ? )))) |
| 778 | (add-face-text-property (line-beginning-position) | 786 | (add-face-text-property (line-beginning-position) |
| 779 | (point) 'eww-form-text) | 787 | (point) 'eww-form-textarea) |
| 780 | (put-text-property (line-beginning-position) (point) | 788 | (put-text-property (line-beginning-position) (point) |
| 781 | 'local-map eww-textarea-map) | 789 | 'local-map eww-textarea-map) |
| 782 | (forward-line 1)) | 790 | (forward-line 1)) |