[Emacs-diffs] trunk r115741: eww textarea fixups

[Lars Ingebrigtsen]

------------------------------------------------------------
revno: 115741
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/16142
author: Kenjiro NAKAYAMA <address@hidden>
committer: Lars Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Wed 2013-12-25 16:33:16 +0100
message:
  eww textarea fixups
  
  * net/eww.el (eww-form-textarea): Use a different face for
  textareas than text input since they have different keymaps.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/net/eww.el                eww.el-20130610114603-80ap3gwnw4x4m5ix-1

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-12-24 19:48:40 +0000
+++ b/lisp/ChangeLog    2013-12-25 15:33:16 +0000
@@ -1,3 +1,9 @@
+2013-12-25  Kenjiro NAKAYAMA  <address@hidden>
+
+       * net/eww.el (eww-form-textarea): Use a different face for
+       textareas than text input since they have different keymaps
+       (bug#16142).
+
 2013-12-24  Fabián Ezequiel Gallina  <address@hidden>
 
        * progmodes/python.el (python-nav-beginning-of-statement): Speed

=== modified file 'lisp/net/eww.el'
--- a/lisp/net/eww.el   2013-12-24 18:07:55 +0000
+++ b/lisp/net/eww.el   2013-12-25 15:33:16 +0000
@@ -115,6 +115,14 @@
   :version "24.4"
   :group 'eww)
 
+(defface eww-form-textarea
+  '((t (:background "#C0C0C0"
+                   :foreground "black"
+                   :box (:line-width 1))))
+  "Face for eww textarea inputs."
+  :version "24.4"
+  :group 'eww)
+
 (defvar eww-current-url nil)
 (defvar eww-current-dom nil)
 (defvar eww-current-source nil)
@@ -776,7 +784,7 @@
        (when (> pad 0)
          (insert (make-string pad ? ))))
       (add-face-text-property (line-beginning-position)
-                             (point) 'eww-form-text)
+                             (point) 'eww-form-textarea)
       (put-text-property (line-beginning-position) (point)
                         'local-map eww-textarea-map)
       (forward-line 1))