From 136794678e8bbe0117df97465bd6b314626ab359 Mon Sep 17 00:00:00 2001 From: rsiddharth Date: Tue, 18 Jun 2019 19:34:54 -0400 Subject: hn/g: Update fp. hn/g (fp): Re-align some lines. --- hn/g | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/hn/g b/hn/g index 3f3d133..1435451 100755 --- a/hn/g +++ b/hn/g @@ -22,11 +22,9 @@ (define (fp) "Fetch HN Front Page." - (let ((hc (http-conn-open HOST - #:ssl? (ssl-make-client-context 'secure) + (let ((hc (http-conn-open HOST #:ssl? (ssl-make-client-context 'secure) #:port 443))) - (define-values (status headers port) - (http-conn-sendrecv! hc "/")) + (define-values (status headers port) (http-conn-sendrecv! hc "/")) (port->string port))) (define (athings) -- cgit v1.2.3