summaryrefslogtreecommitdiff
path: root/src/guile
diff options
context:
space:
mode:
authorLudovic Court`es2007-08-31 17:05:55 +0000
committerLudovic Court`es2007-08-31 17:05:55 +0000
commitb829858803daf0ee6da6cb3498ef703cd8776fc9 (patch)
tree6a5d2348a6af7f3b3d8938aa74f840115ed4c868 /src/guile
parentd0b458a3a704bb4a5e04467a9eb0342c8a974d42 (diff)
parent6b72aa99c8628d54d405d6acac9195302eac560d (diff)
downloadskribilo-b829858803daf0ee6da6cb3498ef703cd8776fc9.tar.gz
skribilo-b829858803daf0ee6da6cb3498ef703cd8776fc9.tar.lz
skribilo-b829858803daf0ee6da6cb3498ef703cd8776fc9.zip
biblio: Fixed default template for `book' and `inbook'.
* src/guile/skribilo/biblio/template.scm (make-bib-entry-template/default): For `book', use `(or author editor)'. Added an `inbook' case. git-archimport-id: skribilo@sv.gnu.org--2006/skribilo--devo--1.2--patch-162
Diffstat (limited to 'src/guile')
-rw-r--r--src/guile/skribilo/biblio/template.scm14
1 files changed, 11 insertions, 3 deletions
diff --git a/src/guile/skribilo/biblio/template.scm b/src/guile/skribilo/biblio/template.scm
index 5699699..cf17a92 100644
--- a/src/guile/skribilo/biblio/template.scm
+++ b/src/guile/skribilo/biblio/template.scm
@@ -153,13 +153,13 @@
(", " month) " " year
(", pp. " pages) "."))
((article)
- `(author ". " (or title url documenturl) ". "
+ '(author ". " (or title url documenturl) ". "
"In " journal ", " volume
("(" number ") ")", "
(address ", ") month " " year ", "
("pp. " pages) "."))
((inproceedings)
- `(author ". " (or title url documenturl) ". "
+ '(author ". " (or title url documenturl) ". "
"In " booktitle ", "
(series ", ")
("(" number ")")
@@ -167,12 +167,20 @@
(publisher ", ")
(month " ") year "."))
((book) ;; FIXME: Title should be in italics
- '(author ". " (or title url documenturl) ". "
+ '((or author editor)
+ ". " (or title url documenturl) ". "
publisher
(", " address)
(", " month)
", " year
(", pp. " pages) "."))
+ ((inbook)
+ `(author ". " (or title url documenturl) ". "
+ "In " booktitle ", " publisher
+ (", " editor " (" ,(_ "editor") ")")
+ (", " ,(_ "Chapter ") chapter)
+ (", pp. " pages) ", "
+ (month " ") year "."))
((phdthesis)
`(author ". " (or title url documenturl)
", " ,(_ "PhD Thesis")