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 
 | 
			
		||||
    ";;; job finished with exitno: " 
 | 
			
		||||
    (number->string (job-res-errno j-res)) "\n"
 | 
			
		||||
    ";;; job finished with stdout: " 
 | 
			
		||||
    ";;; job finished with stdout:\n" 
 | 
			
		||||
    (job-res-stdout j-res) "\n"
 | 
			
		||||
    ";;; job finished with stderr: " 
 | 
			
		||||
    ";;; job finished with stderr:\n"
 | 
			
		||||
    (job-res-stderr j-res) "\n"))
 | 
			
		||||
  (newline))
 | 
			
		||||
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue