Skip to content

Commit 5a501e0

Browse files
Merge pull request rudolfochrist#16 from wojtyniak/patch-1
Use https to download quicklisp's archive
2 parents ecf160a + 1e9a214 commit 5a501e0

1 file changed

Lines changed: 1 addition & 0 deletions

File tree

install.sh

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -21,6 +21,7 @@ meta=$( curl -s https://beta.quicklisp.org/client/quicklisp.sexp | \
2121
awk '/:client-tar/,/)/' | tr '\n' ' ' | tr -s ' ' )
2222

2323
url=$( perl -nle 'print $& if m{(?<=:url ")[^"]*}g' <<< "$meta" )
24+
[[ "$url" =~ ^http:// ]] && url="https${url#http}"
2425
sha256=$( perl -nle 'print $& if m{(?<=:sha256 ")[^"]*}g' <<< "$meta" )
2526

2627
echo "Downloading quicklisp client..."

0 commit comments

Comments
 (0)