From a23aa4c9c99147bd6f36941fbae3a2d94c481bed Mon Sep 17 00:00:00 2001
From: Phillip Lord <phillip.lord@russet.org.uk>
Date: Wed, 21 Oct 2015 21:35:00 +0100
Subject: Make ERT results print without newline escaping.

---
 lisp/emacs-lisp/ert.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el
index 2eba0216faf..7d0d2546464 100644
--- a/lisp/emacs-lisp/ert.el
+++ b/lisp/emacs-lisp/ert.el
@@ -64,6 +64,7 @@
 (require 'ewoc)
 (require 'find-func)
 (require 'help)
+(require 'pp)
 
 
 ;;; UI customization options.
@@ -1300,7 +1301,8 @@ EXPECTEDP specifies whether the result was expected."
 (defun ert--pp-with-indentation-and-newline (object)
   "Pretty-print OBJECT, indenting it to the current column of point.
 Ensures a final newline is inserted."
-  (let ((begin (point)))
+  (let ((begin (point))
+        (pp-escape-newlines nil))
     (pp object (current-buffer))
     (unless (bolp) (insert "\n"))
     (save-excursion
-- 
cgit v1.2.1