From b2a77b518c18dffac2966ee0b3f6bc5c6ae77924 Mon Sep 17 00:00:00 2001
From: rsiddharth <s@ricketyspace.net>
Date: Tue, 18 Jun 2019 19:38:04 -0400
Subject: hn/g: Update athing:link.

hn/g (athing:link): Update function.
---
 hn/g | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/hn/g b/hn/g
index ef9cb94..8866e31 100755
--- a/hn/g
+++ b/hn/g
@@ -42,8 +42,7 @@
   "Return athing link (HREF DESC)"
   (let* ((s (sxpath "//a[@class=\"storylink\"]"))
          (l (s a)))
-    (list (sxml:attr (car l) 'href)
-          (sxml:text l))))
+    (list (sxml:text l) (sxml:attr (car l) 'href))))
 
 (define (athings:hash h athings:sxml)
   (cond ((empty? athings:sxml) h)
-- 
cgit v1.2.3