Fix of issue 3495.

svn: r13965
This commit is contained in:
Peter Landgren 2010-01-03 11:31:19 +00:00
parent ace6e05e48
commit 3de66d1b62

View File

@ -1286,7 +1286,11 @@ class GedcomWriter(BasicUtils.UpdateCallback):
# Reference to the source # Reference to the source
self.__writeln(level, "SOUR", "@%s@" % src.get_gramps_id()) self.__writeln(level, "SOUR", "@%s@" % src.get_gramps_id())
if ref.get_page() != "": if ref.get_page() != "":
self.__writeln(level+1, 'PAGE', ref.get_page()) # PAGE <WHERE_WITHIN_SOURCE> can not have CONC lines.
# WHERE_WITHIN_SOURCE:= {Size=1:248}
# Maximize line to 248 and set limit to 248, for no line split
self.__writeln(level+1, 'PAGE', ref.get_page()[0:248], limit=248)
conf = min(ref.get_confidence_level(), gen.lib.SourceRef.CONF_VERY_HIGH) conf = min(ref.get_confidence_level(), gen.lib.SourceRef.CONF_VERY_HIGH)
if conf != gen.lib.SourceRef.CONF_NORMAL and conf != -1: if conf != gen.lib.SourceRef.CONF_NORMAL and conf != -1: