From 6d193ccaca78c07e56b43a6c78507a6ba96d39e4 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Tue, 8 Dec 2020 19:31:40 -0500 Subject: process buffer: Restore header's leading newline 94d0281 (process buffer: Add time to header, 2020-11-27) was just supposed to add a "time:" field, but it also dropped the leading "\n". Add it back, and also avoid the unnecessary concat call. Message-Id: <87h7ovstub.fsf@kyleam.com> --- piem.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/piem.el b/piem.el index addc27e..0ee4ca6 100644 --- a/piem.el +++ b/piem.el @@ -232,10 +232,12 @@ Functions should accept one argument, the message ID given to (goto-char (point-max)) (display-buffer buffer) (let ((inhibit-read-only t)) - (insert (format (concat "%s\n" - ";;; process: %S\n" - ";;; directory: %s\n" - ";;; time: %s\n") + (insert (format " +%s +;;; process: %S +;;; directory: %s +;;; time: %s +" (char-to-string 12) ; form feed (cons program program-args) default-directory -- cgit v1.2.3