Commit bfec493e authored by Pip Cet's avatar Pip Cet Committed by Lars Ingebrigtsen

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).
parent f660616f
Pipeline #2031 failed with stage
in 90 minutes and 1 second
......@@ -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))
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment