From 87ef78a2219872f16f42fbe41f04c3b4d4047c10 Mon Sep 17 00:00:00 2001
From: Pavel Demin <pavel-demin@outlook.com>
Date: Sat, 20 Oct 2018 21:32:04 +0200
Subject: [PATCH] update date and time format in ft8d.f90

---
 ft8d.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ft8d.f90 b/ft8d.f90
index 9163db6..801a84c 100644
--- a/ft8d.f90
+++ b/ft8d.f90
@@ -35,8 +35,8 @@ program ft8d
   read(10,end=999) dialfreq,dd
   close(10)
   j2=index(infile,'.c2')
-  date=infile(j2-13:j2-8)
-  time=infile(j2-6:j2-3)
+  date=infile(j2-11:j2-6)
+  time=infile(j2-4:j2-1)
   do ipart=1,4
     ndecodes=0
     ndepth=1