guix-install.sh: Warn if we suspect dodgy automation.
This doesn't affect the installation (yet), but reserves the right to default to safe values other than ‘y’ in future. * etc/guix-install.sh (welcome): Warn if the ‘return’ wasn't.
This commit is contained in:
		
							parent
							
								
									1e8e84b286
								
							
						
					
					
						commit
						a326e3085d
					
				
					 1 changed files with 8 additions and 1 deletions
				
			
		| 
						 | 
					@ -581,6 +581,7 @@ fi
 | 
				
			||||||
 | 
					
 | 
				
			||||||
welcome()
 | 
					welcome()
 | 
				
			||||||
{
 | 
					{
 | 
				
			||||||
 | 
					    local char
 | 
				
			||||||
    cat<<"EOF"
 | 
					    cat<<"EOF"
 | 
				
			||||||
    ░░░                                     ░░░
 | 
					    ░░░                                     ░░░
 | 
				
			||||||
    ░░▒▒░░░░░░░░░               ░░░░░░░░░▒▒░░
 | 
					    ░░▒▒░░░░░░░░░               ░░░░░░░░░▒▒░░
 | 
				
			||||||
| 
						 | 
					@ -607,7 +608,13 @@ This script installs GNU Guix on your system
 | 
				
			||||||
https://www.gnu.org/software/guix/
 | 
					https://www.gnu.org/software/guix/
 | 
				
			||||||
EOF
 | 
					EOF
 | 
				
			||||||
    echo -n "Press return to continue..."
 | 
					    echo -n "Press return to continue..."
 | 
				
			||||||
    read -r
 | 
					    read -r char
 | 
				
			||||||
 | 
					    if [ "$char" ]; then
 | 
				
			||||||
 | 
						echo
 | 
				
			||||||
 | 
						echo "...that ($char) was not a return!"
 | 
				
			||||||
 | 
						_msg "${WAR}Use newlines to automate installation, e.g.: yes '' | ${0##*/}"
 | 
				
			||||||
 | 
						_msg "${WAR}Any other method is unsupported and likely to break in future."
 | 
				
			||||||
 | 
					    fi
 | 
				
			||||||
}
 | 
					}
 | 
				
			||||||
 | 
					
 | 
				
			||||||
main()
 | 
					main()
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue