[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 0ad028c91f 1/2: ; Clean up recently added SVG test
From: |
Stefan Kangas |
Subject: |
master 0ad028c91f 1/2: ; Clean up recently added SVG test |
Date: |
Fri, 9 Sep 2022 08:25:08 -0400 (EDT) |
branch: master
commit 0ad028c91febd0d1a6c8c47babf3dddbe06b68b4
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>
; Clean up recently added SVG test
* test/manual/image-tests.el (image-tests-load-image/svg-invalid):
Clean up.
---
test/manual/image-tests.el | 17 +++++++++--------
1 file changed, 9 insertions(+), 8 deletions(-)
diff --git a/test/manual/image-tests.el b/test/manual/image-tests.el
index c726845bd3..9cb98252f6 100644
--- a/test/manual/image-tests.el
+++ b/test/manual/image-tests.el
@@ -80,14 +80,15 @@
(ert-deftest image-tests-load-image/svg-invalid ()
(with-temp-buffer
- (pop-to-buffer (current-buffer))
- (insert (propertize " "
- 'display '(image :data
- "invalid foo bar"
- :type svg)))
- (redisplay))
- (with-current-buffer "*Messages*"
- (should (string-search "XML parse error" (buffer-string)))))
+ (let ((messages-buffer-name (buffer-name (current-buffer))))
+ (with-temp-buffer
+ (pop-to-buffer (current-buffer))
+ (insert (propertize " "
+ 'display '(image :data
+ "invalid foo bar"
+ :type svg)))
+ (redisplay))
+ (should (string-search "XML parse error" (buffer-string))))))
;;;; image-test-size