Make toggling checkboxes work again

* eww.el (eww-update-field): Make toggling checkboxes work
again (bug#21881).

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 8ea17e01018685a6bdbbaf91487a5b916019c07e..65ff733726d2610030fd8f1f7215ac64b7e8e8a7 100644 (file)
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -1181,16 +1181,19 @@ See URL `https://developer.mozilla.org/en-US/docs/Web/HTML/Element/Input'.")
      (eww-update-field display))))
 
 (defun eww-update-field (string &optional offset)
-  (if (not offset) (setq offset 0))
+  (unless offset
+    (setq offset 0))
   (let ((properties (text-properties-at (point)))
        (start (+ (eww-beginning-of-field) offset))
        (current-end (1+ (eww-end-of-field)))
-       (new-end (1+ (+ (eww-beginning-of-field) (length string)))))
+       (new-end (+ (eww-beginning-of-field) (length string)))
+        (inhibit-read-only t))
     (delete-region start current-end)
     (forward-char offset)
     (insert string
            (make-string (- (- (+ new-end offset) start) (length string)) ? ))
-    (if (= 0 offset) (set-text-properties start new-end properties))
+    (when (= 0 offset)
+      (set-text-properties start new-end properties))
     start))
 
 (defun eww-toggle-checkbox ()