Changeset 20543 in project for gazette/layouts/article.sxml


Ignore:
Timestamp:
09/27/10 17:12:27 (10 years ago)
Author:
Moritz Heidkamp
Message:

gazette: add dates and authors to archive and reverse its ordering; fix a bug in the default-page-vars regexp for issue layouts

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gazette/layouts/article.sxml

    r20060 r20543  
    11()
    22`((h1 ,($ 'title))
    3 
    43  (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))))
     4       (p (@ (class "authors")) "by " ,(authors->sxml ($ 'authors)))
     5       (p (@ (class "date")) ,(format-seconds ($ 'date))))
    156
    167  (inject ,contents)
Note: See TracChangeset for help on using the changeset viewer.