about summary refs log tree commit diff
path: root/web/view
diff options
context:
space:
mode:
authorPjotr Prins2025-09-21 10:29:09 +0200
committerPjotr Prins2025-09-21 10:29:09 +0200
commitb3ba723fca7bf67e8d78f23089f0150f52b44e20 (patch)
treecf3e34f496203b01c565a6fccfc4f5a18759fc4e /web/view
parentc7b30c964e7190868aeb7ba87649544f42d525ad (diff)
downloadgn-guile-b3ba723fca7bf67e8d78f23089f0150f52b44e20.tar.gz
Working on aging links
Diffstat (limited to 'web/view')
-rw-r--r--web/view/view.scm10
1 files changed, 7 insertions, 3 deletions
diff --git a/web/view/view.scm b/web/view/view.scm
index 4300863..6b2ef22 100644
--- a/web/view/view.scm
+++ b/web/view/view.scm
@@ -15,7 +15,7 @@
   #:export (view-brand))
 
 
-(define (view-aging)
+(define (view-aging-home)
   (aging-html #:info
               `(
 		,(markdown-github->sxml "genenetwork/gn-docs/general/brand/aging/home.md")
@@ -44,8 +44,12 @@ data to benefit from the power of integrated datasets, please contact:")
               (img (@ (src "/static/images/CMOR.jpg") (width "1000"))))))
 
 (define* (view-brand path)
-  (match path
-    ("aging" (view-aging))
+  (match (pk path)
+    ("aging/UMHET-3" (aging-html #:info
+              `(,(markdown-github->sxml "genenetwork/gn-docs/general/brand/aging/home.md"))))
+    ("aging/umhet-3" (aging-html #:info
+              `(,(markdown-github->sxml "genenetwork/gn-docs/general/brand/aging/home.md"))))
+    ("aging" (view-aging-home))
     ("gnqa" (default-gn-template
                    "genenetwork/gn-docs/general/brand/gnqa/gnqa.md"
                    "GeneNetwork Question and Answer System"))