diff options
-rw-r--r-- | gpxunit.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gpxunit.pas b/gpxunit.pas index a0ca3cb..df5d34f 100644 --- a/gpxunit.pas +++ b/gpxunit.pas @@ -150,9 +150,9 @@ var begin assignFile(f,s); rewrite(f); - writeln(f,prefix.text); + write(f,prefix.text); for i:=0 to length(gpx)-1 do begin - writeln(f,'<gpx'+gpx[i].kopf+'>'); + writeln(f,'<gpx '+gpx[i].kopf+'>'); for j:=0 to length(gpx[i].trks)-1 do begin writeln(f,' <trk>'); while pos('<',gpx[i].trks[j].name)>0 do |