소스 검색

* unit ptckvm renamed PTC.KVM if dotted units are used

Nikolay Nikolov 9 달 전
부모
커밋
dfcdb1e742
4개의 변경된 파일10개의 추가작업 그리고 0개의 파일을 삭제
  1. 2 0
      packages/ptckvm/fpmake.pp
  2. 3 0
      packages/ptckvm/namespaced/PTC.KVM.pas
  3. 3 0
      packages/ptckvm/namespaces.lst
  4. 2 0
      packages/ptckvm/src/ptckvm.pas

+ 2 - 0
packages/ptckvm/fpmake.pp

@@ -31,6 +31,8 @@ begin
 
     T:=P.Targets.AddUnit('ptckvm.pas');
 
+    P.NamespaceMap:='namespaces.lst';
+
 {$ifndef ALLPACKAGES}
     Run;
     end;

+ 3 - 0
packages/ptckvm/namespaced/PTC.KVM.pas

@@ -0,0 +1,3 @@
+unit PTC.KVM;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i ptckvm.pas}

+ 3 - 0
packages/ptckvm/namespaces.lst

@@ -0,0 +1,3 @@
+src/ptckvm.pas=namespaced/PTC.KVM.pas
+{s*:src/}=namespaced/
+{i+:src/}

+ 2 - 0
packages/ptckvm/src/ptckvm.pas

@@ -30,7 +30,9 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
+{$IFNDEF FPC_DOTTEDUNITS}
 unit ptckvm;
+{$ENDIF FPC_DOTTEDUNITS}
 
 {$mode objfpc}