mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

(texinfo docbook) support for @acronym

Browse source 
* module/texinfo/docbook.scm (*sdocbook->stexi-rules*): Recognize
  "acronym" as parsing to the @acronym texinfo command.
This commit is contained in:
Andy Wingo 2012-05-07 20:39:14 +02:00
parent be52f329b6
commit 520850ad27
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
module/texinfo/docbook.scm
View file

@ -1,6 +1,6 @@
;;;; (texinfo docbook) -- translating sdocbook into stexinfo ;;;; (texinfo docbook) -- translating sdocbook into stexinfo
;;;; ;;;;
;;;; Copyright (C) 2009, 2010 Free Software Foundation, Inc. ;;;; Copyright (C) 2009, 2010, 2012 Free Software Foundation, Inc.
;;;; Copyright (C) 2007, 2009 Andy Wingo <wingo at pobox dot com> ;;;; Copyright (C) 2007, 2009 Andy Wingo <wingo at pobox dot com>
;;;; ;;;;
;;;; This library is free software; you can redistribute it and/or ;;;; This library is free software; you can redistribute it and/or
@ -89,6 +89,8 @@ a number of generic rules for transforming docbook into texinfo."
`(item ,@body)))) `(item ,@body))))
. ,(lambda (tag . body) . ,(lambda (tag . body)
`(itemize ,@body))) `(itemize ,@body)))
(acronym . ,(lambda (tag . body)
`(acronym (% (acronym . ,body)))))
(term . ,detag-one) (term . ,detag-one)
(informalexample . ,detag-one) (informalexample . ,detag-one)
(section . ,identity) (section . ,identity)