diff options
author | Ludovic Courtès <ludo@gnu.org> | 2020-06-18 00:25:15 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2020-06-18 00:30:30 +0200 |
commit | a43aa1bc79b99321e8569e644008907d5841e334 (patch) | |
tree | 3e97a1d3fde876b9bdc84903e6f6fc7f3bf678fa /module/texinfo.scm | |
parent | 5fbf5c10fc3054d788a006f619105a8c60741319 (diff) | |
download | guile-a43aa1bc79b99321e8569e644008907d5841e334.tar.gz |
texinfo: Add basic support for @w{...}.
* module/texinfo.scm (texi-command-specs): Add 'w'.
(space-significant?): Add it.
* module/texinfo/html.scm (tag-replacements): Add 'w'.
* test-suite/tests/texinfo.test ("test-texinfo->stexinfo"): Add test.
Diffstat (limited to 'module/texinfo.scm')
-rw-r--r-- | module/texinfo.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/module/texinfo.scm b/module/texinfo.scm index f3af5c332..ff95f182d 100644 --- a/module/texinfo.scm +++ b/module/texinfo.scm @@ -1,6 +1,6 @@ ;;;; (texinfo) -- parsing of texinfo into SXML ;;;; -;;;; Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014 Free Software Foundation, Inc. +;;;; Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014, 2020 Free Software Foundation, Inc. ;;;; Copyright (C) 2004, 2009 Andy Wingo <wingo at pobox dot com> ;;;; Copyright (C) 2001,2002 Oleg Kiselyov <oleg at pobox dot com> ;;;; @@ -211,6 +211,7 @@ lambda. Only present for @code{INLINE-ARGS}, @code{EOL-ARGS}, (sansserif INLINE-TEXT) (slanted INLINE-TEXT) (t INLINE-TEXT) + (w INLINE-TEXT) ;; Inline args commands (value INLINE-ARGS . (key)) @@ -382,7 +383,7 @@ Examples: ;; The % is for arguments (define (space-significant? command) (memq command - '(example smallexample verbatim lisp smalllisp menu %))) + '(example smallexample verbatim lisp smalllisp menu w %))) ;; Like a DTD for texinfo (define (command-spec command) |