cosmetics for display-job-output

This commit is contained in:
jottbee 2005-03-12 18:53:33 +00:00
parent 638e7c5a2f
commit 80fc7c2dae
1 changed files with 2 additions and 2 deletions

View File

@ -17,9 +17,9 @@
(string-append (string-append
";;; job finished with exitno: " ";;; job finished with exitno: "
(number->string (job-res-errno j-res)) "\n" (number->string (job-res-errno j-res)) "\n"
";;; job finished with stdout: " ";;; job finished with stdout:\n"
(job-res-stdout j-res) "\n" (job-res-stdout j-res) "\n"
";;; job finished with stderr: " ";;; job finished with stderr:\n"
(job-res-stderr j-res) "\n")) (job-res-stderr j-res) "\n"))
(newline)) (newline))