From bfec493efe93e1a1d87013f26d220616b0a82a65 Mon Sep 17 00:00:00 2001 From: Pip Cet Date: Thu, 13 Jun 2019 14:10:56 +0200 Subject: [PATCH] Escape newlines when printing functions in timer list * timer-list.el (list-timers): Bind `print-escape-newlines' to avoid newlines in printed representation (bug#36187). --- lisp/emacs-lisp/timer-list.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/timer-list.el b/lisp/emacs-lisp/timer-list.el index 55aa56b72e0..adfc2250223 100644 --- a/lisp/emacs-lisp/timer-list.el +++ b/lisp/emacs-lisp/timer-list.el @@ -59,7 +59,8 @@ (format "%s" repeat)))) ;; Function. (let ((cl-print-compiled 'static) - (cl-print-compiled-button nil)) + (cl-print-compiled-button nil) + (print-escape-newlines t)) (cl-prin1-to-string (aref timer 5))))) (put-text-property (line-beginning-position) (1+ (line-beginning-position)) -- 2.39.5