* added a := operator from String to xmlCharPtr

git-svn-id: trunk@12537 -

packages/libxml/src/libxml2.pas

@@ -254,6 +254,8 @@ const
   {$i xpointer.inc}
 {$UNDEF FUNCTION}
 
+operator := (const S: String): xmlCharPtr; inline;
+
 implementation
 
 procedure fpcxmlFree(mem: pointer); XMLCALL;
@@ -307,6 +309,11 @@ begin
   result := xmlCharPtr(PChar(str));
 end;
 
+operator := (const S: String): xmlCharPtr; inline;
+begin
+  Result := xmlCharPtr(PChar(S));
+end;
+
 
 (*
  * macros from chvalid.inc