diff options
| author | Erich Eckner <git@eckner.net> | 2017-09-25 20:34:43 +0200 |
|---|---|---|
| committer | Erich Eckner <git@eckner.net> | 2017-09-25 20:34:43 +0200 |
| commit | 5ad4b85e6b16fe785bce018fcb45d5fcedc123aa (patch) | |
| tree | 598aded553ac8189f9044f4972ed7413b01a5d27 | |
| parent | 877419c97dafa6f075c226b2577b1f3c49db249a (diff) | |
| download | units-5ad4b85e6b16fe785bce018fcb45d5fcedc123aa.tar.xz | |
gpxunit.pas: bugfix
| -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 |