test: New tests for Emacs charset handling

[notmuch] / test / test-lib.el

diff --git a/test/test-lib.el b/test/test-lib.el
index bbc03cba957d18fc7e3eb0e71ce93e513f889f54..04c8d63450533dbf566ff25cb6f2276b2032ee5b 100644 (file)
--- a/test/test-lib.el
+++ b/test/test-lib.el
@@ -59,7 +59,9 @@
   "Save visible text in current buffer to file FILENAME.  Default
 FILENAME is OUTPUT."
   (notmuch-post-command)
   "Save visible text in current buffer to file FILENAME.  Default
 FILENAME is OUTPUT."
   (notmuch-post-command)

-  (let ((text (visible-buffer-string)))
+  (let ((text (visible-buffer-string))
+       ;; Tests expect output in UTF-8 encoding
+       (coding-system-for-write 'utf-8))

     (with-temp-file (or filename "OUTPUT") (insert text))))
 
 (defun visible-buffer-string ()
     (with-temp-file (or filename "OUTPUT") (insert text))))
 
 (defun visible-buffer-string ()