summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Court`es2007-06-23 07:41:59 +0000
committerLudovic Court`es2007-06-23 07:41:59 +0000
commit7fcc1f288b8f7a1b2f1c3a16fcba581cd7a9884b (patch)
tree26afdb9431ae7d728e1b45554eb86e262e771b5c
parent061fef172a952f3558b9b6bfdf9f1e4faf9c43cb (diff)
parenta96ab6b83c1754103f37cdd27b872b1e3bda95c0 (diff)
downloadskribilo-7fcc1f288b8f7a1b2f1c3a16fcba581cd7a9884b.tar.gz
skribilo-7fcc1f288b8f7a1b2f1c3a16fcba581cd7a9884b.tar.lz
skribilo-7fcc1f288b8f7a1b2f1c3a16fcba581cd7a9884b.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: skribilo@sv.gnu.org--2006/skribilo--devo--1.2--patch-117
-rw-r--r--ChangeLog18
-rw-r--r--src/guile/skribilo/package/lncs.scm5
2 files changed, 22 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 68e1bd4..addd806 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,24 @@
# arch-tag: automatic-ChangeLog--skribilo@sv.gnu.org--2006/skribilo--devo--1.2
#
+2007-06-23 07:41:59 GMT Ludovic Court`es <ludovic.courtes@laas.fr> patch-117
+
+ Summary:
+ `lncs' package: Prettified bibliography output.
+ Revision:
+ skribilo--devo--1.2--patch-117
+
+ * src/guile/skribilo/package/lncs.scm (&the-bibliography): The
+ `\thebibliography' the number of entries so that all entries are
+ properly aligned.
+
+ modified files:
+ ChangeLog src/guile/skribilo/package/lncs.scm
+
+ new patches:
+ lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-76
+
+
2007-06-23 07:41:25 GMT Ludovic Court`es <ludovic.courtes@laas.fr> patch-116
Summary:
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