From a3b3a3cc7cc8384500631ced698047aa3dcbebad Mon Sep 17 00:00:00 2001
From: Vasilij Schneidermann <mail@vasilij.de>
Date: Tue, 19 Feb 2019 20:50:14 +0100
Subject: [PATCH] elisp: Get rid of newline hack in printer

---
 elisp/printer.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/elisp/printer.el b/elisp/printer.el
index f00efa79..48293529 100644
--- a/elisp/printer.el
+++ b/elisp/printer.el
@@ -12,8 +12,8 @@
       (number-to-string (mal-value form)))
      ((eq type 'string)
       (if print-readably
-          ;; HACK prin1-to-string does only quotes and backslashes
-          (replace-regexp-in-string "\n" "\\\\n" (prin1-to-string value))
+          (let ((print-escape-newlines t))
+            (prin1-to-string value))
         value))
      ((or (eq type 'symbol) (eq type 'keyword))
       (symbol-name value))
-- 
2.20.1