summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Court`es2007-06-18 08:44:42 +0000
committerLudovic Court`es2007-06-18 08:44:42 +0000
commita96ab6b83c1754103f37cdd27b872b1e3bda95c0 (patch)
tree2f38c9e633a1e5821dadd8bd2697b0a294cb1d0e
parent148e1a21118c59b51354c428675c5eb55120a3b3 (diff)
downloadskribilo-a96ab6b83c1754103f37cdd27b872b1e3bda95c0.tar.gz
skribilo-a96ab6b83c1754103f37cdd27b872b1e3bda95c0.tar.lz
skribilo-a96ab6b83c1754103f37cdd27b872b1e3bda95c0.zip
`lncs' package: Prettified bibliography output.
* src/guile/skribilo/package/lncs.scm (&the-bibliography): The `\thebibliography' the number of entries so that all entries are properly aligned. git-archimport-id: lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-76
-rw-r--r--src/guile/skribilo/package/lncs.scm5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/guile/skribilo/package/lncs.scm b/src/guile/skribilo/package/lncs.scm
index 39c4cc4..25b1e5a 100644
--- a/src/guile/skribilo/package/lncs.scm
+++ b/src/guile/skribilo/package/lncs.scm
@@ -240,7 +240,10 @@
",")))))
(markup-writer '&the-bibliography latex
- :before "\\begin{thebibliography}{}\n"
+ :before (lambda (n e)
+ (let ((count (length (markup-body n))))
+ (format #t "\\begin{thebibliography}{~a}\n"
+ count)))
:after "\\end{thebibliography}\n")
(markup-writer '&bib-entry-body