diff options
author | Ludovic Court`es | 2007-08-20 16:28:40 +0000 |
---|---|---|
committer | Ludovic Court`es | 2007-08-20 16:28:40 +0000 |
commit | 655e83cceddc28f7a1b25106e9cafae005530ca5 (patch) | |
tree | 25022a5349289232458bc13f3bfa86a6ae065de9 | |
parent | af8c534f411ef0671f43fda1017f42fcd28a29fa (diff) | |
parent | 6e53232aaf3f3ec31678911643c1e1a9f04d6619 (diff) | |
download | skribilo-655e83cceddc28f7a1b25106e9cafae005530ca5.tar.gz skribilo-655e83cceddc28f7a1b25106e9cafae005530ca5.tar.lz skribilo-655e83cceddc28f7a1b25106e9cafae005530ca5.zip |
lout engine: Always use `@BypassNumber'.
* src/guile/skribilo/engine/lout.scm (lout-block-before): Always use
`@BypassNumber'.
git-archimport-id: skribilo@sv.gnu.org--2006/skribilo--devo--1.2--patch-144
-rw-r--r-- | ChangeLog | 19 | ||||
-rw-r--r-- | src/guile/skribilo/engine/lout.scm | 6 |
2 files changed, 21 insertions, 4 deletions
@@ -2,6 +2,25 @@ # arch-tag: automatic-ChangeLog--skribilo@sv.gnu.org--2006/skribilo--devo--1.2 # +2007-08-20 16:28:40 GMT Ludovic Court`es <ludovic.courtes@laas.fr> patch-144 + + Summary: + lout engine: Always use `@BypassNumber'. + Revision: + skribilo--devo--1.2--patch-144 + + * src/guile/skribilo/engine/lout.scm (lout-block-before): Always use + `@BypassNumber'. + + modified files: + ChangeLog src/guile/skribilo/engine/lout.scm + + new patches: + lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-83 + lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-84 + lcourtes@laas.fr--2006-libre/skribilo--devo--1.2--patch-85 + + 2007-07-29 10:30:53 GMT Ludovic Courtes <ludo@gnu.org> patch-143 Summary: diff --git a/src/guile/skribilo/engine/lout.scm b/src/guile/skribilo/engine/lout.scm index a93cde7..954329c 100644 --- a/src/guile/skribilo/engine/lout.scm +++ b/src/guile/skribilo/engine/lout.scm @@ -1362,12 +1362,10 @@ (output title e) (display " }\n") - (if (number? number) + (if number (format #t " @BypassNumber { ~a }\n" (markup-number-string n)) - (if (not number) - ;; this trick hides the section number - (display " @BypassNumber { } # unnumbered\n"))) + (display " @BypassNumber { } # unnumbered\n")) (cond ((string? ident) (begin |