source: project/gazette/layouts/article.sxml @ 20060

Last change on this file since 20060 was 20060, checked in by Moritz Heidkamp, 10 years ago

gazette: add permalink to all issues, unlink title, remove title.sxml layout and add rudimentary archive page

File size: 622 bytes
Line 
1()
2`((h1 ,($ 'title))
3
4  (div (@ (class "article-meta"))
5       (p (@ (class "authors"))
6          "by "
7          ,(car ($ 'authors))
8          ,@(if (null? (cdr ($ 'authors)))
9                '()
10                (map (lambda (author)
11                       `(,(car author) (span (@ (class "author")) ,(cdr author))))
12                     (append (map (cut cons ", " <>) (butlast (cdr ($ 'authors))))
13                             `((" and " . ,(last ($ 'authors))))))))
14       (p  (@ (class "date")) ,(format-seconds ($ 'date))))
15
16  (inject ,contents)
17
18  (ul (@ (class "links"))
19      (li (a (@ (href ,(page-path))) "Permalink to this issue"))
20      (li (a (@ (href "/archive.html")) "The Chicken Gazette Archive"))))
Note: See TracBrowser for help on using the repository browser.