diff options
| -rw-r--r-- | ChangeLog | 19 | ||||
| -rw-r--r-- | src/guile/skribilo/engine/base.scm | 7 | ||||
| -rw-r--r-- | src/guile/skribilo/package/base.scm | 5 |
3 files changed, 31 insertions, 0 deletions
@@ -2,6 +2,25 @@ # arch-tag: automatic-ChangeLog--skribilo@sv.gnu.org--2006/skribilo--devo--1.2 # +2007-08-29 13:21:41 GMT Ludovic Court`es <ludovic.courtes@laas.fr> patch-156 + + Summary: + `base' package: Introduced `noabbrev'. + Revision: + skribilo--devo--1.2--patch-156 + + * src/guile/skribilo/engine/base.scm (noabbrev): New writer. + + * src/guile/skribilo/package/base.scm (noabbrev): New markup. + + modified files: + ChangeLog src/guile/skribilo/engine/base.scm + src/guile/skribilo/package/base.scm + + new patches: + lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-98 + + 2007-08-29 13:21:09 GMT Ludovic Court`es <ludovic.courtes@laas.fr> patch-155 Summary: diff --git a/src/guile/skribilo/engine/base.scm b/src/guile/skribilo/engine/base.scm index 344146e..63cd9a3 100644 --- a/src/guile/skribilo/engine/base.scm +++ b/src/guile/skribilo/engine/base.scm @@ -194,6 +194,13 @@ :action #f) ;*---------------------------------------------------------------------*/ +;* noabbrev ... */ +;*---------------------------------------------------------------------*/ +(markup-writer 'noabbrev + :action (lambda (n e) + (output (markup-body n) e))) + +;*---------------------------------------------------------------------*/ ;* bib-ref ... */ ;*---------------------------------------------------------------------*/ (markup-writer 'bib-ref diff --git a/src/guile/skribilo/package/base.scm b/src/guile/skribilo/package/base.scm index 9616080..66f1df1 100644 --- a/src/guile/skribilo/package/base.scm +++ b/src/guile/skribilo/package/base.scm @@ -1330,6 +1330,11 @@ label-proc))))))) ;*---------------------------------------------------------------------*/ +;* noabbrev ... */ +;*---------------------------------------------------------------------*/ +(define-simple-markup noabbrev) + +;*---------------------------------------------------------------------*/ ;* make-index ... */ ;* ------------------------------------------------------------- */ ;* doc: */ |