diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-01-13 22:50:51 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-01-13 22:50:51 +0100 |
| commit | 641278c624a3a0c06856656255f648f2cf4f6a92 (patch) | |
| tree | 49c47c4c61dd0704e89cfd75681bc16f171e7ad5 /module/calp/html/view/calendar.scm | |
| parent | Add debug buttons in popup for dumping xcal and jcal. (diff) | |
| parent | Document (vcompenent control). (diff) | |
| download | calp-641278c624a3a0c06856656255f648f2cf4f6a92.tar.gz calp-641278c624a3a0c06856656255f648f2cf4f6a92.tar.xz | |
Merge branch 'doc' into jcal
Diffstat (limited to 'module/calp/html/view/calendar.scm')
| -rw-r--r-- | module/calp/html/view/calendar.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/calp/html/view/calendar.scm b/module/calp/html/view/calendar.scm index 39f3f635..3f607bb7 100644 --- a/module/calp/html/view/calendar.scm +++ b/module/calp/html/view/calendar.scm @@ -39,7 +39,7 @@ ;;; All this filtering is probably slow, and should be looked into. ;; TODO place this somewhere proper -(define repo-url (make-parameter "https://git.hornquist.se")) +(define repo-url (make-parameter "https://git.hornquist.se/calp")) ;; TODO document what @var{render-calendar} is supposed to take and return. @@ -142,7 +142,7 @@ (footer (@ (style "grid-area: footer")) (span "Page generated " ,(date->string (current-date))) - (span (a (@ (href ,(repo-url) "/calparse")) + (span (a (@ (href ,(repo-url))) "Source Code"))) ;; Small calendar and navigation |