Changeset 7 for trunk/Forms/USourceSelection.pas

Timestamp:

Feb 4, 2011, 1:16:43 PM (13 years ago)

Author:

chronos

Message:

 

File:

• trunk/Forms/USourceSelection.pas (modified) (1 diff)

trunk/Forms/USourceSelection.pas

@@ -49 +49 @@
   Sources.Clear;
   for I := 0 to MainForm.Sources.Count - 1 do
-    if TSource(MainForm.Sources[I]).ProjectType = ProjectType then
+    if (TSource(MainForm.Sources[I]).ProjectType = ProjectType) or
+    (ProjectType = '') then
       Sources.Add(MainForm.Sources[I]);
   if ListView1.Items.Count <> Sources.Count then