summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorLars Magne Ingebrigtsen <larsi@gnus.org>2013-07-19 16:44:16 +0200
committerLars Magne Ingebrigtsen <larsi@gnus.org>2013-07-19 16:44:16 +0200
commitdfbc66e3e4c21c682493228b4d1b4843a8cd5dfc (patch)
treec63632cca2242cfabc82ec16a55c98bc6cffd05d /lisp
parent63b34baae679272a1c9438b4f85a9c596bc6beb8 (diff)
downloademacs-dfbc66e3e4c21c682493228b4d1b4843a8cd5dfc.tar.gz
emacs-dfbc66e3e4c21c682493228b4d1b4843a8cd5dfc.tar.bz2
emacs-dfbc66e3e4c21c682493228b4d1b4843a8cd5dfc.zip
eww textarea input fixup
* net/eww.el (eww-process-text-input): Allow inputting when the point is at the start of the line, as the properties aren't front-sticky.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/net/eww.el2
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d583d7f9063..5ab2e41f2e4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
2013-07-19 Lars Magne Ingebrigtsen <larsi@gnus.org>
+ * net/eww.el (eww-process-text-input): Allow inputting when the
+ point is at the start of the line, as the properties aren't
+ front-sticky.
+
* net/shr.el (shr-make-table-1): Ensure that we don't infloop on
degenerate widths.
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index d832aa7ef3e..d65932ae7c9 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -603,7 +603,7 @@ appears in a <link> or <a> tag."
(insert " ")))
(defun eww-process-text-input (beg end length)
- (let* ((form (get-text-property end 'eww-form))
+ (let* ((form (get-text-property (min (1+ end) (point-max)) 'eww-form))
(properties (text-properties-at end))
(type (plist-get form :type)))
(when (and form