From 4ea86602a207d95019812be591df67ded5e7ca3e Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Fri, 2 Jan 2015 06:11:56 +0100
Subject: [PATCH] added project-specific -I to dcd -I

---
 src/ce_dcd.pas | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/src/ce_dcd.pas b/src/ce_dcd.pas
index 08815010..46e0d02d 100644
--- a/src/ce_dcd.pas
+++ b/src/ce_dcd.pas
@@ -103,6 +103,7 @@ end;
 procedure TCEDcdWrapper.projChanged(aProject: TCEProject);
 var
   i: Integer;
+  fold: string;
 begin
   if fProj <> aProject then
     exit;
@@ -111,6 +112,12 @@ begin
   //
   for i:= 0 to fProj.Sources.Count-1 do
     addImportFolder(extractFilePath(fProj.getAbsoluteSourceName(i)));
+  for i := 0 to fProj.currentConfiguration.pathsOptions.includes.Count-1 do
+  begin
+    fold := fProj.currentConfiguration.pathsOptions.includes.Strings[i];
+    if DirectoryExists(fold) then
+      addImportFolder(fold);
+  end;
 end;
 
 procedure TCEDcdWrapper.projClosing(aProject: TCEProject);