yogsototh/init-haskell-project
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

different test

Browse source
This commit is contained in:
Yann Esposito (Yogsototh) 2013-11-15 19:57:11 +01:00
parent ae5cd66e0b
commit 3c6d3c6584
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
holy-haskell.sh
View file

@ -73,7 +73,6 @@ you "Ask me the questions, bridgekeeper, I am not afraid.\n"
bk "What is the name of your project?"
print -n "> ";read project
project=${${project:gs/ /-/}:l} # use lowercase and replace spaces by dashes
print -- DEBUG $project
# Verify project has the right format
if perl -e 'exit("'$project'" =~ /^[a-z][a-z0-9-]*$/)'; then
@ -93,8 +92,8 @@ ask email
email="$answer"
# github
bkn "What is your github user name?"
githubname="$( curl -sH 'Accept: application/vnd.github.v3.text-match+json' 'https://api.github.com/search/users?q='$email|grep '"login":'|perl -pe 's/.*"([^"]*)",/$1/' )"
print -- " ($githubname)"
githubname=( $( curl -sH 'Accept: application/vnd.github.v3.text-match+json' 'https://api.github.com/search/users?q='$email|grep '"login":'|perl -pe 's/.*"([^"]*)",/$1/' ) )
(( ${#githubname} == 1 )) && print -- " ($githubname)"
print -n "> ";read github
[[ $github = "" ]] && github=$githubname
# synopsis