summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorrsiddharth <s@ricketyspace.net>2019-06-18 19:34:54 -0400
committerrsiddharth <s@ricketyspace.net>2019-06-18 19:34:54 -0400
commit136794678e8bbe0117df97465bd6b314626ab359 (patch)
tree32e76554825ba4f0f9594782a644cbbcf816f33b
parent444483355aca32d6ca4491224f14d3af553fcd0e (diff)
hn/g: Update fp.
hn/g (fp): Re-align some lines.
-rwxr-xr-xhn/g6
1 files 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)