From 00da2efd7a37a7a056297fdaf61dd7d57e7eb6b2 Mon Sep 17 00:00:00 2001
From: blankie <blankie@nixnetmail.com>
Date: Sat, 8 Oct 2022 15:42:41 +0700
Subject: [PATCH] article...

---
 src/page-file.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/page-file.rkt b/src/page-file.rkt
index 608e9c8..ab27146 100644
--- a/src/page-file.rkt
+++ b/src/page-file.rkt
@@ -60,8 +60,8 @@
            `(span " Posted in "
               ,@(map
                  (λ (article)
-                   (define page-path (jp "/title" result))
-                   (define title (jp "/titleText" result page-path))
+                   (define page-path (jp "/title" article))
+                   (define title (jp "/titleText" article page-path))
                    `(a (@ (href ,(format "/~a/wiki/~a" wikiname page-path)))
                         ,title))
                  smaller-article-list))