diff --git a/test/lisp/cus-edit-tests.el b/test/lisp/cus-edit-tests.el index 4d148b4f411..114e461b7ac 100644 --- a/test/lisp/cus-edit-tests.el +++ b/test/lisp/cus-edit-tests.el @@ -70,11 +70,13 @@ (should (search-forward cus-edit-tests--obsolete-option-tag nil t)))) (ert-deftest cus-edit-tests-customize-saved/show-obsolete () - ;; FIXME: How to test for saved options? - :expected-result :failed (with-cus-edit-test "*Customize Saved*" - (customize-saved) - (should (search-forward cus-edit-tests--obsolete-option-tag nil t)))) + (unwind-protect + (progn + (put 'cus-edit-tests--obsolete-option-tag 'saved-value '(t)) + (customize-saved) + (should (search-forward cus-edit-tests--obsolete-option-tag nil t))) + (put 'cus-edit-tests--obsolete-option-tag 'saved-value nil)))) (provide 'cus-edit-tests) ;;; cus-edit-tests.el ends here