New Gedcom misplaced trailer

--------------080109030908010606020502
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 7bit

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 ([email protected])
1   NOTE
2     CONT This output was generated by Gedcom.pm.
2     CONT Gedcom.pm is Copyright 1999-2013, Paul Johnson ([email protected])
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


--------------080109030908010606020502--