diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2020-12-08 19:31:40 -0500 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2020-12-08 22:07:33 -0500 |
| commit | 6d193ccaca78c07e56b43a6c78507a6ba96d39e4 (patch) | |
| tree | 1723cccda2c6a6fced251f52ab88ba479a59de96 | |
| parent | 94d028164dc6e9e94a2761af86d6a38e2873296d (diff) | |
| download | piem-6d193ccaca78c07e56b43a6c78507a6ba96d39e4.tar.gz | |
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>
| -rw-r--r-- | piem.el | 10 |
1 files changed, 6 insertions, 4 deletions
@@ -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 |