This commit is contained in:
Бондарев Иван 2016-11-13 10:48:27 +01:00
parent 175ffb274d
commit 219e8e6413

View file

@ -122,7 +122,9 @@ namespace VisualPascalABC
{
if (ToSend == null && File.Exists(StackTraceItem.SourceFileName))
ToSend = StackTraceItem;
if (Workbench.UserOptions.SkipStakTraceItemIfSourceFileInSystemDirectory && Path.GetDirectoryName(StackTraceItem.SourceFileName) == WorkbenchServiceFactory.BuildService.CompilerOptions.SearchDirectory)
if (Workbench.UserOptions.SkipStakTraceItemIfSourceFileInSystemDirectory &&
(Path.GetDirectoryName(StackTraceItem.SourceFileName) == WorkbenchServiceFactory.BuildService.CompilerOptions.SearchDirectory ||
Path.GetDirectoryName(StackTraceItem.SourceFileName) == WorkbenchServiceFactory.BuildService.CompilerOptions.SearchDirectory+"Source"))
continue;
if (!(bool)Workbench.VisualEnvironmentCompiler.SourceFilesProvider(StackTraceItem.SourceFileName, PascalABCCompiler.SourceFileOperation.Exists))
{