diff --git a/src/ce_main.pas b/src/ce_main.pas index e898f0dc..0e222a0f 100644 --- a/src/ce_main.pas +++ b/src/ce_main.pas @@ -1960,7 +1960,8 @@ begin begin dmdproc.Parameters.Add('-main'); dmdproc.Parameters.Add('-unittest'); - dmdproc.Parameters.Add('-cov'); + if fCovModUt then + dmdproc.Parameters.Add('-cov'); end else dmdproc.Parameters.Add('-version=runnable_module'); dmdproc.Parameters.Add('-of' + fname + exeExt); @@ -1982,8 +1983,8 @@ begin for i := 0 to lst.Count-1 do if lst[i][1..7] = '0000000' then begin - fMsgs.message(format('%s(%d):%s',[fDoc.fileName, i+1, - 'is not cevered by the unittests']), fDoc, amcEdit, amkWarn); + fMsgs.message(format('%s(%d): %s',[fDoc.fileName, i+1, + 'not covered by the unittests']), fDoc, amcEdit, amkWarn); fullcov := false; end; sysutils.DeleteFile(covname);