diff options
| author | Daniel Mendler <mail@daniel-mendler.de> | 2023-08-01 17:36:37 +0200 |
|---|---|---|
| committer | Daniel Mendler <mail@daniel-mendler.de> | 2023-08-01 17:47:56 +0200 |
| commit | 82e23b327b87c09b4c4400c3df4e54c2f29231cb (patch) | |
| tree | 7da52cd9c9358360f9c3b3200b88725a21bf77f2 /compat-tests.el | |
| parent | 9b5d12f777e228efd952116275459218833cd2a5 (diff) | |
compat-29: Add window-configuration-equal-p
Diffstat (limited to 'compat-tests.el')
| -rw-r--r-- | compat-tests.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/compat-tests.el b/compat-tests.el index 834fe0c..02fa536 100644 --- a/compat-tests.el +++ b/compat-tests.el @@ -406,6 +406,15 @@ (should-equal (getenv A) B)) (should-not (getenv A)))) +(ert-deftest compat-window-configuration-equal-p () + (let ((wc (current-window-configuration))) + (should (window-configuration-equal-p wc wc)) + (save-window-excursion + (with-temp-buffer + (pop-to-buffer (current-buffer)) + (should-not (window-configuration-equal-p (current-window-configuration) wc)))) + (should (window-configuration-equal-p (current-window-configuration) wc)))) + (ert-deftest compat-with-window-non-dedicated () (unwind-protect (progn |