Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
New Gedcom misplaced trailer
3 views
Skip to first unread message
Bill Anderson
Feb 10, 2013, 6:19:02 PM2/10/13
to perl-...@perl.org
When I create a new, empty Gedcom object, add an individual, and then
write the new Gedcom to a file, the trailer is in the wrong place.
The trailer is after the header, not at the end of the file.
Does anyone know why?
0 HEAD
1 SOUR Gedcom.pm
2 NAME Gedcom.pm
2 VERS 1.18
2 CORP Paul Johnson
3 ADDR http://www.pjcj.net
2 DATA
3 COPR Copyright 1998-2013, Paul Johnson (pa...@pjcj.net)
1 NOTE
2 CONT This output was generated by Gedcom.pm.
2 CONT Gedcom.pm is Copyright 1999-2013, Paul Johnson (pa...@pjcj.net)
2 CONT Version 1.18 - 24th January 2013
2 CONT
2 CONT Gedcom.pm is free. It is licensed under the same terms as
Perl itself.
2 CONT
2 CONT The latest version of Gedcom.pm should be available from my
homepage:
2 CONT http://www.pjcj.net
1 GEDC
2 VERS 5.5
2 FORM LINEAGE-LINKED
1 DATE Sun Feb 10 17:15:38 2013
1 CHAR ANSEL
1 SUBM @SUBM1@
0 @SUBM1@ SUBM
1 NAME Bill Anderson,,,
0 TRLR
0 @I1@ INDI
write the new Gedcom to a file, the trailer is in the wrong place.
The trailer is after the header, not at the end of the file.
Does anyone know why?
0 HEAD
1 SOUR Gedcom.pm
2 NAME Gedcom.pm
2 VERS 1.18
2 CORP Paul Johnson
3 ADDR http://www.pjcj.net
2 DATA
3 COPR Copyright 1998-2013, Paul Johnson (pa...@pjcj.net)
1 NOTE
2 CONT This output was generated by Gedcom.pm.
2 CONT Gedcom.pm is Copyright 1999-2013, Paul Johnson (pa...@pjcj.net)
2 CONT Version 1.18 - 24th January 2013
2 CONT
2 CONT Gedcom.pm is free. It is licensed under the same terms as
Perl itself.
2 CONT
2 CONT The latest version of Gedcom.pm should be available from my
homepage:
2 CONT http://www.pjcj.net
1 GEDC
2 VERS 5.5
2 FORM LINEAGE-LINKED
1 DATE Sun Feb 10 17:15:38 2013
1 CHAR ANSEL
1 SUBM @SUBM1@
0 @SUBM1@ SUBM
1 NAME Bill Anderson,,,
0 TRLR
0 @I1@ INDI
Bill Anderson
Feb 11, 2013, 12:57:02 PM2/11/13
to perl-...@perl.org
I found out that $ged->order will fix this issue.
Paul Johnson
Feb 11, 2013, 1:46:58 PM2/11/13
to Bill Anderson, perl-...@perl.org
On Mon, Feb 11, 2013 at 11:57:02AM -0600, Bill Anderson wrote:
> I found out that $ged->order will fix this issue.
Sorry I didn't reply sooner, but I'm glad you found the answer.
> I found out that $ged->order will fix this issue.
--
Paul Johnson - pa...@pjcj.net
http://www.pjcj.net
0 new messages