fcl-xml compatility (fpc 2.6.1+)

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2479 8e941d3f-bd1b-0410-a28a-d453659cc2b4

wst/trunk/wst_fpc_xml.pas

@@ -93,7 +93,9 @@ end;
 function CreateDoc() : TXMLDocument ;
 begin
   Result := TXMLDocument.Create();
+{$IF ((FPC_VERSION = 2) and (FPC_RELEASE = 6)) }  
   Result.Encoding := 'UTF-8';
+{$IFEND}
 end;
 
 function FindNode(ANode : TDOMNode;const ANodeName : string) : TDOMNode;{$IFDEF USE_INLINE}inline;{$ENDIF}