diff options
author | Jeffrey H. Kingston <jeff@it.usyd.edu.au> | 2010-09-14 20:39:32 +0000 |
---|---|---|
committer | Jeffrey H. Kingston <jeff@it.usyd.edu.au> | 2010-09-14 20:39:32 +0000 |
commit | 128e9a1532ce7fa38ddc16de06d213530dc5ce15 (patch) | |
tree | 97a930289ac5f12779b62507bb07ccf9be39c4a9 /z11.c | |
parent | b2f1a4e879d3013974e41674dbf684d816f1aa95 (diff) | |
download | lout-128e9a1532ce7fa38ddc16de06d213530dc5ce15.tar.gz |
Lout 3.31.
git-svn-id: http://svn.savannah.nongnu.org/svn/lout/trunk@31 9365b830-b601-4143-9ba8-b4a8e2c3339c
Diffstat (limited to 'z11.c')
-rw-r--r-- | z11.c | 9 |
1 files changed, 7 insertions, 2 deletions
@@ -1,7 +1,7 @@ /*@z11.c:Style Service:EchoStyle()@*******************************************/ /* */ -/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.30) */ -/* COPYRIGHT (C) 1991, 2004 Jeffrey H. Kingston */ +/* THE LOUT DOCUMENT FORMATTING SYSTEM (VERSION 3.31) */ +/* COPYRIGHT (C) 1991, 2005 Jeffrey H. Kingston */ /* */ /* Jeffrey H. Kingston (jeff@it.usyd.edu.au) */ /* School of Information Technologies */ @@ -81,6 +81,7 @@ FULL_CHAR *EchoStyle(STYLE *style) } if( nobreakfirst(*style) ) StringCat(res, AsciiToFull(":NBF")); if( nobreaklast(*style) ) StringCat(res, AsciiToFull(":NBL")); + if( marginkerning(*style) ) StringCat(res, AsciiToFull(":MK")); sprintf(buff, ":C%d:P%d", colour(*style), texture(*style)); StringCat(res, AsciiToFull(buff)); StringCat(res, AsciiToFull("]")); @@ -212,6 +213,10 @@ static void changebreak(STYLE *style, OBJECT x) nobreaklast(*style) = TRUE; else if( StringEqual(string(x), STR_BREAK_LAST) ) nobreaklast(*style) = FALSE; + else if( StringEqual(string(x), STR_BREAK_MARGINKERNING) ) + marginkerning(*style) = TRUE; + else if( StringEqual(string(x), STR_BREAK_NOMARGINKERNING) ) + marginkerning(*style) = FALSE; else Error(11, 5, "found unknown option to %s symbol (%s)", WARN, &fpos(x), KW_BREAK, string(x)); } |