diff options
| -rw-r--r-- | web/view/view.scm | 2 | ||||
| -rw-r--r-- | web/webserver.scm | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/web/view/view.scm b/web/view/view.scm index 6b2ef22..95ff0a1 100644 --- a/web/view/view.scm +++ b/web/view/view.scm @@ -44,7 +44,7 @@ data to benefit from the power of integrated datasets, please contact:") (img (@ (src "/static/images/CMOR.jpg") (width "1000")))))) (define* (view-brand path) - (match (pk path) + (match path ("aging/UMHET-3" (aging-html #:info `(,(markdown-github->sxml "genenetwork/gn-docs/general/brand/aging/home.md")))) ("aging/umhet-3" (aging-html #:info diff --git a/web/webserver.scm b/web/webserver.scm index e0b0ea6..0c0bdd1 100644 --- a/web/webserver.scm +++ b/web/webserver.scm @@ -258,6 +258,8 @@ otherwise search for set/group data" (render-static-image (string-append (dirname (current-filename)) "/static/images/" fn))) (('GET "home" path) (render-brand path)) ; branding route for /home/aging, /home/msk etc + (('GET "home" "aging" path) + (render-brand (string-append "aging/" path))) ; branding route subs of /home/aging/... (('GET "dataset" "bxd-publish" "list") (render-json (get-bxd-publish))) (('GET "dataset" "bxd-publish" "dataid" "values" page) |