From 4d54efd4e7f17213a885069568ca953dcfba7ba1 Mon Sep 17 00:00:00 2001 From: inoussa Date: Fri, 26 Nov 2010 09:50:16 +0000 Subject: [PATCH] Typo correction(WriteDocumetation > WriteDocumentation). git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1384 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- wst/trunk/ws_helper/generator.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/wst/trunk/ws_helper/generator.pas b/wst/trunk/ws_helper/generator.pas index fe6e23d65..4b818ac14 100644 --- a/wst/trunk/ws_helper/generator.pas +++ b/wst/trunk/ws_helper/generator.pas @@ -162,7 +162,7 @@ type FImpLastStream : ISourceStream; FRttiFunc : ISourceStream; private - procedure WriteDocumetation(AElement : TPasElement); + procedure WriteDocumentation(AElement : TPasElement); procedure WriteDocIfEnabled(AElement : TPasElement);{$IFDEF USE_INLINE}inline;{$ENDIF} // Array handling helper routines procedure WriteObjectArray(ASymbol : TPasArrayType); @@ -1914,7 +1914,7 @@ end; { TInftGenerator } -procedure TInftGenerator.WriteDocumetation(AElement : TPasElement); +procedure TInftGenerator.WriteDocumentation(AElement : TPasElement); var pl : TStrings; docString : string; @@ -1937,7 +1937,7 @@ end; procedure TInftGenerator.WriteDocIfEnabled(AElement : TPasElement); begin if ( goGenerateDocAsComments in Options ) then - WriteDocumetation(AElement); + WriteDocumentation(AElement); end; procedure TInftGenerator.WriteObjectArray(ASymbol : TPasArrayType);