From eafb5d00fbec47a314b4eff32dddc36c3ba9a561 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Sun, 19 May 2013 17:12:02 +0200 Subject: acmproc: Make `references' conform to the ACM guidelines. * src/guile/skribilo/package/acmproc.scm (references): Always use `chapter'. Leave the font size unchanged. Sort entries according to `bib-sort/first-author-last-name'. * NEWS: Update. --- NEWS | 1 + src/guile/skribilo/package/acmproc.scm | 11 ++++++----- 2 files changed, 7 insertions(+), 5 deletions(-) diff --git a/NEWS b/NEWS index 6a58f08..a557d7e 100644 --- a/NEWS +++ b/NEWS @@ -24,6 +24,7 @@ It used to be that footnote HTML code contained an extraneous , and nested tags, which is invalid. ** acmproc: Fix typos in the LaTeX engine customs +** acmproc: `references' uses a chapter, the default font, and sorts entries ** `ref' warnings now always print the location of erroneous `:bib' references ** `numref' inserts an unbreakable space (was a breakable space) after its `:text' diff --git a/src/guile/skribilo/package/acmproc.scm b/src/guile/skribilo/package/acmproc.scm index 9929c85..92f7b6d 100644 --- a/src/guile/skribilo/package/acmproc.scm +++ b/src/guile/skribilo/package/acmproc.scm @@ -28,6 +28,7 @@ :use-module (skribilo package base) :autoload (skribilo utils keywords) (the-options the-body) :autoload (skribilo evaluator) (evaluate-document) + :autoload (skribilo biblio author) (bib-sort/first-author-last-name) :use-module (skribilo lib) :use-module (skribilo utils syntax) @@ -180,13 +181,13 @@ (if (string? old) (engine-custom-set! le 'predocument (string-append cop old)) (engine-custom-set! le 'predocument cop)))) - + ;*---------------------------------------------------------------------*/ ;* references ... */ ;*---------------------------------------------------------------------*/ (define (references) (list "\n\n" - (if (engine-format? "latex") - (font :size -1 (flush :side 'left (the-bibliography))) - (section :title "References" - (font :size -1 (the-bibliography)))))) + (chapter :title "References" + (flush :side 'left + (the-bibliography + :sort bib-sort/first-author-last-name))))) -- cgit v1.2.3