; Add test for last change

* test/lisp/wid-edit-tests.el
(widget-test-editable-field-widget-get/put): Check return value of
widget-put.  (Bug#76664)

(cherry picked from commit 49e3ef343784adaf967d1ff02a8499eb4d7d1ddd)

diff --git a/test/lisp/wid-edit-tests.el b/test/lisp/wid-edit-tests.el
index e99347f1666d15d5c713d4d5e28035e132682beb..1a3a35ff496197d2d36bc07d1ecfc2a56314fd9e 100644 (file)
--- a/test/lisp/wid-edit-tests.el
+++ b/test/lisp/wid-edit-tests.el
@@ -30,8 +30,8 @@
                                  "My Name")))
       (should (eq (widget-get widget :size) 13))
       (should (equal (widget-get widget :format) "Name: %v "))
-      (widget-put widget :size 1)
-      (widget-put widget :format "foo")
+      (should (eq (widget-put widget :size 1) 1))
+      (should (equal (widget-put widget :format "foo") "foo"))
       (should (eq (widget-get widget :size) 1))
       (should (equal (widget-get widget :format) "foo")))))