alignment align;
int just_numbers;
wchar_t underline;
+ wchar_t *number_suffix;
} alignstruct;
typedef struct {
ret.atitle.underline = L'=';
ret.achapter.align = LEFT;
ret.achapter.just_numbers = FALSE;
+ ret.achapter.number_suffix = ustrdup(L": ");
ret.achapter.underline = L'-';
ret.nasect = 1;
ret.asect = mknewa(alignstruct, ret.nasect);
ret.asect[0].align = LEFTPLUS;
ret.asect[0].just_numbers = TRUE;
+ ret.asect[0].number_suffix = ustrdup(L" ");
ret.asect[0].underline = L'\0';
ret.include_version_id = TRUE;
ret.indent_preambles = FALSE;
} else if (!ustricmp(source->keyword, L"text-chapter-underline")) {
ret.achapter.underline = *uadv(source->keyword);
} else if (!ustricmp(source->keyword, L"text-chapter-numeric")) {
- ret.achapter.underline = utob(uadv(source->keyword));
+ ret.achapter.just_numbers = utob(uadv(source->keyword));
+ } else if (!ustricmp(source->keyword, L"text-chapter-suffix")) {
+ ret.achapter.number_suffix = ustrdup(uadv(source->keyword));
} else if (!ustricmp(source->keyword, L"text-section-align")) {
wchar_t *p = uadv(source->keyword);
int n = 0;
ret.nasect = n+1;
}
ret.asect[n].just_numbers = utob(p);
+ } else if (!ustricmp(source->keyword, L"text-section-suffix")) {
+ wchar_t *p = uadv(source->keyword);
+ int n = 0;
+ if (uisdigit(*p)) {
+ n = utoi(p);
+ p = uadv(p);
+ }
+ if (n >= ret.nasect) {
+ int i;
+ ret.asect = resize(ret.asect, n+1);
+ for (i = ret.nasect; i <= n; i++)
+ ret.asect[i] = ret.asect[ret.nasect-1];
+ ret.nasect = n+1;
+ }
+ ret.asect[n].number_suffix = ustrdup(p);
} else if (!ustricmp(source->keyword, L"text-title-align")) {
ret.atitle.align = utoalign(uadv(source->keyword));
} else if (!ustricmp(source->keyword, L"text-title-underline")) {
word spaceword;
FILE *fp;
char *prefixextra;
+ int nesting, nestindent;
int indentb, indenta;
IGNORE(keywords); /* we don't happen to need this */
conf.indent_preambles ? conf.indent : 0, 0,
conf.width + (conf.indent_preambles ? 0 : conf.indent));
+ nestindent = conf.listindentbefore + conf.listindentafter;
+ nesting = 0;
+
/* Do the main document */
for (p = sourceform; p; p = p->next) switch (p->type) {
+ case para_LcontPush:
+ nesting++;
+ break;
+ case para_LcontPop:
+ assert(nesting > 0);
+ nesting--;
+ break;
+
/*
* Things we ignore because we've already processed them or
* aren't going to touch them in this pass.
break;
case para_Rule:
- text_rule(fp, conf.indent, conf.width);
+ text_rule(fp, conf.indent + nestindent*nesting,
+ conf.width - nestindent*nesting);
break;
case para_Normal:
+ case para_DescribedThing:
+ case para_Description:
case para_BiblioCited:
case para_Bullet:
case para_NumberedList:
prefixextra = "."; /* FIXME: configurability */
indentb = conf.listindentbefore;
indenta = conf.listindentafter;
+ } else if (p->type == para_Description) {
+ prefix = NULL;
+ prefixextra = NULL;
+ indentb = conf.listindentbefore;
+ indenta = conf.listindentafter;
} else {
prefix = NULL;
prefixextra = NULL;
body = p->words;
}
text_para(fp, prefix, prefixextra, body,
- conf.indent + indentb, indenta, conf.width);
+ conf.indent + nestindent*nesting + indentb, indenta,
+ conf.width - nestindent*nesting - indentb - indenta);
if (wp) {
wp->next = NULL;
free_word_list(body);
break;
case para_Code:
- text_codepara(fp, p->words, conf.indent + conf.indent_code, conf.width - 2 * conf.indent_code);
+ text_codepara(fp, p->words,
+ conf.indent + nestindent*nesting + conf.indent_code,
+ conf.width - nestindent*nesting - 2 * conf.indent_code);
break;
}
* Tidy up
*/
fclose(fp);
- sfree(conf.bullet.text);
+ {
+ int i;
+ sfree(conf.achapter.number_suffix);
+ for (i = 0; i < conf.nasect; i++)
+ sfree(conf.asect[i].number_suffix);
+ sfree(conf.asect);
+ sfree(conf.bullet.text);
+ }
}
/*
wrappedline *wrapping, *p;
if (align.just_numbers && nprefix) {
+ char *c;
text_rdaddwc(&t, nprefix, NULL);
- rdaddc(&t, ' '); /* FIXME: as below */
+ if (text_convert(align.number_suffix, &c)) {
+ rdaddsc(&t, c);
+ sfree(c);
+ }
} else if (!align.just_numbers && tprefix) {
+ char *c;
text_rdaddwc(&t, tprefix, NULL);
- rdaddsc(&t, ": "); /* FIXME: configurability */
+ if (text_convert(align.number_suffix, &c)) {
+ rdaddsc(&t, c);
+ sfree(c);
+ }
}
margin = length = (t.text ? strlen(t.text) : 0);
if (prefixextra)
rdaddsc(&pfx, prefixextra);
fprintf(fp, "%*s%s", indent, "", pfx.text);
+ /* If the prefix is too long, shorten the first line to fit. */
e = extraindent - strlen(pfx.text);
if (e < 0) {
- e = 0;
- firstlinewidth -= e;
+ firstlinewidth += e; /* this decreases it, since e < 0 */
if (firstlinewidth < 0) {
e = indent + extraindent;
firstlinewidth = width;
fprintf(fp, "\n");
- }
+ } else
+ e = 0;
}
sfree(pfx.text);
} else