dlugolecki.net.pl
Dziennik
Polecane
Software
projects
/
gedcom-parse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
utf8.h is renamed to utf8tools.h
[gedcom-parse.git]
/
gom
/
source_citation.c
diff --git
a/gom/source_citation.c
b/gom/source_citation.c
index ff479d92972ec68aa56927db46b9fed07a0664b1..17c2b6dcb2d1b19ff08e47a1f70ce192db4c89c5 100644
(file)
--- a/
gom/source_citation.c
+++ b/
gom/source_citation.c
@@
-250,6
+250,9
@@
int write_citations(Gedcom_write_hndl hndl, int parent,
if (obj->date || obj->text)
result |= gedcom_write_element_str(hndl, ELT_SUB_SOUR_DATA, 0,
ELT_SUB_SOUR, NULL);
if (obj->date || obj->text)
result |= gedcom_write_element_str(hndl, ELT_SUB_SOUR_DATA, 0,
ELT_SUB_SOUR, NULL);
+ if (obj->date)
+ result |= gedcom_write_element_date(hndl, ELT_SUB_SOUR_DATA_DATE, 0,
+ ELT_SUB_SOUR_DATA, obj->date);
if (obj->text)
result |= write_texts(hndl, ELT_SUB_SOUR_DATA, obj->text);
if (obj->quality)
if (obj->text)
result |= write_texts(hndl, ELT_SUB_SOUR_DATA, obj->text);
if (obj->quality)