{ $<ctxt>$ = start_element(ELT_SUB_CONT,
PARENT, $1, $3, $4,
GEDCOM_MAKE_STRING(val1, $4));
- SAFE_BUF_ADDCHAR(&concat_buffer, '\n');
+ if (compat_mode(C_NOTE_NO_VALUE)) {
+ char* str = get_buf_string(&concat_buffer);
+ if (str[0] != '\0')
+ SAFE_BUF_ADDCHAR(&concat_buffer, '\n');
+ }
+ else {
+ SAFE_BUF_ADDCHAR(&concat_buffer, '\n');
+ }
safe_buf_append(&concat_buffer, $4);
START(CONT, $1, $<ctxt>$)
}