scripts: shell: Handle EPIPE errors when displaying help.
* guix/scripts/shell.scm (%options): Handle EPIPE errors when displaying help.
This commit is contained in:
		
							parent
							
								
									94e0496aa8
								
							
						
					
					
						commit
						acdbb798d0
					
				
					 1 changed files with 1 additions and 1 deletions
				
			
		| 
						 | 
					@ -116,7 +116,7 @@ interactive shell in that environment.\n"))
 | 
				
			||||||
    (append
 | 
					    (append
 | 
				
			||||||
        (list (option '(#\h "help") #f #f
 | 
					        (list (option '(#\h "help") #f #f
 | 
				
			||||||
                      (lambda args
 | 
					                      (lambda args
 | 
				
			||||||
                        (show-help)
 | 
					                        (leave-on-EPIPE (show-help))
 | 
				
			||||||
                        (exit 0)))
 | 
					                        (exit 0)))
 | 
				
			||||||
              (option '(#\V "version") #f #f
 | 
					              (option '(#\V "version") #f #f
 | 
				
			||||||
                      (lambda args
 | 
					                      (lambda args
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue