diff options
| author | Daniel Mendler <mail@daniel-mendler.de> | 2023-01-23 07:48:10 +0100 |
|---|---|---|
| committer | Daniel Mendler <mail@daniel-mendler.de> | 2023-01-27 09:45:19 +0100 |
| commit | 2f486b34030d7905e4e295441377e65ff7056638 (patch) | |
| tree | 39d848061dd14df85ff11eeff4033c67d6550858 /compat-tests.el | |
| parent | f6c5ffc6485ea2d2b0c65e7189895ec06124792e (diff) | |
compat-29: Add with-delayed-message
Diffstat (limited to 'compat-tests.el')
| -rw-r--r-- | compat-tests.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/compat-tests.el b/compat-tests.el index e8a5189..2c4d1cf 100644 --- a/compat-tests.el +++ b/compat-tests.el @@ -2848,5 +2848,10 @@ (should sentence-end-double-space) (should-equal major-mode #'text-mode))) +(ert-deftest with-delayed-message () + ;; No real test, since the backported function never displays a message. + (should-equal 'result (with-delayed-message (1 "timeout") 'result)) + (should-equal 'result (funcall-with-delayed-message 1 "timeout" (lambda () 'result)))) + (provide 'compat-tests) ;;; compat-tests.el ends here |