Преглед на файлове

* Do not copy a library to a remote target if this library name is specified using %DELFILES directive.

git-svn-id: branches/targetandroid@23489 -
yury преди 12 години
родител
ревизия
e0a70d0510
променени са 1 файла, в които са добавени 4 реда и са изтрити 0 реда
  1. 4 0
      tests/utils/dotest.pp

+ 4 - 0
tests/utils/dotest.pp

@@ -1248,6 +1248,10 @@ begin
       exit(true);
     end;
   execres:=true;
+  { Check if library should be deleted. Do not copy to remote target in such case. }
+  if (deAfter in DelExecutable) and (Config.DelFiles <> '') then
+    if SplitFileName(FileToCopy) = DllPrefix + Trim(Config.DelFiles) + DllExt then
+      exit;
   { We don't want to create subdirs, remove paths from the test }
   TestRemoteExe:=RemotePath+'/'+SplitFileName(FileToCopy);
   if deBefore in DelExecutable then