diff options
| author | Glenn Morris | 2019-07-14 13:28:54 -0700 |
|---|---|---|
| committer | Glenn Morris | 2019-07-14 13:28:54 -0700 |
| commit | fe2141d15715afa2fbcfd6375503e65ff745dceb (patch) | |
| tree | fc573ac658bbfe86e88a5ced09f6b5c1434458b9 | |
| parent | 9d84fcbef5439628df99c2022659a6eefb0a138e (diff) | |
| download | emacs-fe2141d15715afa2fbcfd6375503e65ff745dceb.tar.gz emacs-fe2141d15715afa2fbcfd6375503e65ff745dceb.zip | |
Update a ffap test
* test/lisp/ffap-tests.el (ffap-other-window--bug-25352):
Update for incompatible ffap-other-window change.
| -rw-r--r-- | test/lisp/ffap-tests.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/test/lisp/ffap-tests.el b/test/lisp/ffap-tests.el index 5b2f43cb2d3..3aa2812ec5a 100644 --- a/test/lisp/ffap-tests.el +++ b/test/lisp/ffap-tests.el | |||
| @@ -71,11 +71,9 @@ Host = example.com\n") | |||
| 71 | "Test for Bug#25352. Checks that the window configuration is | 71 | "Test for Bug#25352. Checks that the window configuration is |
| 72 | left alone when opening a URL in an external browser." | 72 | left alone when opening a URL in an external browser." |
| 73 | (cl-letf* ((old (current-window-configuration)) | 73 | (cl-letf* ((old (current-window-configuration)) |
| 74 | ((symbol-function 'ffap-prompter) | ||
| 75 | (lambda () "https://www.gnu.org")) | ||
| 76 | (urls nil) | 74 | (urls nil) |
| 77 | (ffap-url-fetcher (lambda (url) (push url urls) nil))) | 75 | (ffap-url-fetcher (lambda (url) (push url urls) nil))) |
| 78 | (should-not (ffap-other-window)) | 76 | (should-not (ffap-other-window "https://www.gnu.org")) |
| 79 | (should (equal (current-window-configuration) old)) | 77 | (should (equal (current-window-configuration) old)) |
| 80 | (should (equal urls '("https://www.gnu.org"))))) | 78 | (should (equal urls '("https://www.gnu.org"))))) |
| 81 | 79 | ||