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

* Slightly modified patch from Graeme, Mantis #21357 which adds an assigned.

git-svn-id: trunk@20409 -
marco преди 13 години
родител
ревизия
e6cdc2b744
променени са 1 файла, в които са добавени 2 реда и са изтрити 1 реда
  1. 2 1
      utils/fpdoc/dwlinear.pp

+ 2 - 1
utils/fpdoc/dwlinear.pp

@@ -893,7 +893,8 @@ begin
         Writeln(Format('%s : ',[SDocVersion]));
         WriteDescr(TypeDecl, DocNode.Version);
         end;
-      ConvertNotes(TypeDecl,DocNode.Notes);
+      if Assigned(DocNode) and assigned(DocNode.Notes) then
+        ConvertNotes(TypeDecl,DocNode.Notes);
       DescrEndParagraph;
       end;
   end;