cosmetics for display-job-output
This commit is contained in:
		
							parent
							
								
									638e7c5a2f
								
							
						
					
					
						commit
						80fc7c2dae
					
				
							
								
								
									
										4
									
								
								job.scm
								
								
								
								
							
							
						
						
									
										4
									
								
								job.scm
								
								
								
								
							| 
						 | 
					@ -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))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
		Reference in New Issue