diff options
author | Ludovic Court`es | 2007-06-11 16:00:19 +0000 |
---|---|---|
committer | Ludovic Court`es | 2007-06-11 16:00:19 +0000 |
commit | d558f49f502ed9fa21ee75f75ef53490cf0a48ea (patch) | |
tree | b286d00b2093adfebcae676e9dff15b21b2d56dd /src/guile | |
parent | 4bc8ca4a30e3a1348d4e6362ac3ff60b2ed10911 (diff) | |
parent | 9de369aeabb484175f8784c41dbad0592b5db91e (diff) | |
download | skribilo-d558f49f502ed9fa21ee75f75ef53490cf0a48ea.tar.gz skribilo-d558f49f502ed9fa21ee75f75ef53490cf0a48ea.tar.lz skribilo-d558f49f502ed9fa21ee75f75ef53490cf0a48ea.zip |
Lout engine: Work around bug with tables within floating figures.
* src/guile/skribilo/engine/lout.scm (table): Check whether N is within a
figure, in which case `@OneRow' must be preprended.
git-archimport-id: skribilo@sv.gnu.org--2006/skribilo--devo--1.2--patch-113
Diffstat (limited to 'src/guile')
-rw-r--r-- | src/guile/skribilo/engine/lout.scm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/guile/skribilo/engine/lout.scm b/src/guile/skribilo/engine/lout.scm index 664e046..6a8486f 100644 --- a/src/guile/skribilo/engine/lout.scm +++ b/src/guile/skribilo/engine/lout.scm @@ -2200,6 +2200,14 @@ ;; Mark each row with vertical spanning information (lout-table-mark-vspan! n) + (if (find1-up (lambda (n) + (is-markup? n 'figure)) + n) + ;; Work around a bug preventing `@VSpan' from working + ;; properly within floating figures: + ;; http://article.gmane.org/gmane.comp.type-setting.lout/1090 . + (display "\n@OneRow")) + (display "\n@Tbl # table\n") (if (number? border) |