summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xhn/g3
1 files changed, 1 insertions, 2 deletions
diff --git a/hn/g b/hn/g
index 1435451..ef9cb94 100755
--- a/hn/g
+++ b/hn/g
@@ -36,8 +36,7 @@
(define (athing:id a)
"Return athing id"
(let ((id (sxml:attr a 'id)))
- (if (empty? id) (error "athing:id: Unable to get id")
- id)))
+ (if (empty? id) (error "athing:id: Unable to get id") id)))
(define (athing:link a)
"Return athing link (HREF DESC)"