--- Merging r21999 into '.':

U    rtl/objpas/classes/classesh.inc

# revisions: 21999
fetching log for rev 21999 - 361 characters
r21999 | marco | 2012-08-02 15:01:27 +0200 (Thu, 02 Aug 2012) | 2 lines
Changed paths:
   M /trunk/rtl/objpas/classes/classesh.inc

 * workaround for unsupported construct in fpdoc. (enum declared nested in class)

git-svn-id: branches/fixes_2_6@22000 -

rtl/objpas/classes/classesh.inc

@@ -206,8 +206,10 @@ type
     Procedure RaiseIndexError(Index: Integer);
   public
 {$IFNDEF VER2_4}
+{$ifndef fpdocsystem}
     Type
       TDirection = (FromBeginning, FromEnd);
+{$endif}
 {$ENDIF}
     destructor Destroy; override;
     Procedure AddList(AList : TFPList);