From 522729d4bd5d6b242a92a6a37f0262e306064f0d Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Sun, 7 Feb 2016 00:37:12 +0100
Subject: [PATCH] fixup for 67b1b16, lst fname under win

---
 src/ce_main.pas | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/ce_main.pas b/src/ce_main.pas
index e87eda81..57b89578 100644
--- a/src/ce_main.pas
+++ b/src/ce_main.pas
@@ -2014,6 +2014,9 @@ begin
     fname   := stripFileExt(TProcess(sender).Executable);
     fullcov := true;
     covname := ReplaceStr(fname + '.lst', DirectorySeparator, '-');
+    {$IFDEF WINDOWS}
+    covname := ReplaceStr(covname, DriveSeparator, '-');
+    {$ENDIF}
     if covname.fileExists then
     begin
       lst := TStringList.Create;