Procházet zdrojové kódy

* Interfaces not always assigned

Michaël Van Canneyt před 4 měsíci
rodič
revize
63b57ea842
1 změnil soubory, kde provedl 2 přidání a 1 odebrání
  1. 2 1
      utils/fpdoc/dwlinear.pp

+ 2 - 1
utils/fpdoc/dwlinear.pp

@@ -428,7 +428,8 @@ begin
   WriteClassInheritanceOverView(ClassDecl);
 
   // Write Interfaces Overview;
-  WriteClassInterfacesOverView(ClassDecl);
+  if assigned(ClassDecl.Interfaces) then
+    WriteClassInterfacesOverView(ClassDecl);
   // Write method overview
   WriteMethodOverView(ClassDecl,ClassDecl.Members);
   // Write Property Overview;