From 5ad4b85e6b16fe785bce018fcb45d5fcedc123aa Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Mon, 25 Sep 2017 20:34:43 +0200
Subject: gpxunit.pas: bugfix

---
 gpxunit.pas | 4 ++--
 1 file 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
-- 
cgit v1.2.3-70-g09d2