From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp1 ([2001:41d0:2:267::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms12 with LMTPS id 4HfNAvQa0F+uVgAAsNZ9tg (envelope-from ) for ; Wed, 09 Dec 2020 00:31:48 +0000 Received: from out0.migadu.com ([2001:41d0:2:267::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp1 with LMTPS id OIo6OvMa0F+dJwAAbx9fmQ (envelope-from ) for ; Wed, 09 Dec 2020 00:31:47 +0000 X-Report-Abuse: Please report any abuse attempt to abuse@migadu.com and include these headers. DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=kyleam.com; s=key1; t=1607473955; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:mime-version:mime-version:content-type:content-type: in-reply-to:in-reply-to:references:references; bh=1Y/nkh7lbCoPxnngi+yjcnHanZd+9AWFX7j9uY9T2+E=; b=JpoTQlyXV/k22EY6HYTPrt8GXwLtACj4vQdU4JUce9dkfUdQEfO2pAa6G8hHbE64ag1EUx ryPPGoKrotWMRftGB5rJvsBMhao6GLrvhtKma+F25qmZeyfQbUgjU8f6PNlhJSJkV8xSmT ARBvHyVP1qwUrWs1z+WsEmcbu9ScjRGyeySGIR29d4RB+rElI8VjaoNZpq2sn4GnvSIDSA FofSiGHz0Rkk549f7YMYeW4f8d1hpxTSUiC8wyNLuXZYXbMMaIGluYStbBg7b1pVMYDMgY weNMscrlqc0q07viqChltbG8OuTJPEgISSuMdve6Wki0NUfZd5SXFDlv8oKUxQ== From: Kyle Meyer To: piem@inbox.kyleam.com Subject: [PATCH] process buffer: Restore header's leading newline In-Reply-To: <20201127205815.17313-1-kyle@kyleam.com> References: <20201127205815.17313-1-kyle@kyleam.com> Message-ID: <87h7ovstub.fsf@kyleam.com> MIME-Version: 1.0 Content-Type: text/plain X-Migadu-Flow: FLOW_OUT X-Migadu-Auth-User: kyle@kyleam.com Date: Wed, 09 Dec 2020 00:32:35 GMT X-TUID: mCudBOiFqzW2 Kyle Meyer writes: > @@ -231,10 +232,14 @@ (defun piem--process-go (dir program program-args fn) > (goto-char (point-max)) > (display-buffer buffer) > (let ((inhibit-read-only t)) > - (insert (format "\n%s\n;;; process: %S\n;;; directory: %s\n" > + (insert (format (concat "%s\n" > + ";;; process: %S\n" I should've taken a closer look before applying. This lost a newline. -- >8 -- Subject: [PATCH] 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. --- 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 @@ (defun piem--process-go (dir program program-args fn) (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 base-commit: 94d028164dc6e9e94a2761af86d6a38e2873296d -- 2.29.2