anchor.diff:  implementation
   
   uses
  -  mXML_oxml;
  +  mXML_oxml, mUtility;
   
   var
     InternalFactory : TImpl_Factory;
  
positive.code: begin
    Result := StrToBool(Self.GetAttribute(Name, BoolToStr(DefaultValue, true)));
  end;
  
  procedure TmXmlElement.SetValue(const aValue: TmXMLString);
  begin
  
negative.code:     procedure SetBooleanAttribute(Name : TmXmlString; Value : Boolean);
      function GetBooleanAttribute(Name: TmXMLString): boolean; overload;
      function GetBooleanAttribute(Name: TmXMLString; DefaultValue : boolean): boolean; overload;
      {$IFDEF GRAPHICS_AVAILABLE}
      procedure SetColorAttribute(const aName: TmXmlString; const aValue: TColor); overload;
      procedure SetColorAttribute(const aName: TmXmlString; const aValue: TNullableColor); overload;
      function GetColorAttribute(const aName: TmXmlString): TColor; overload;
      function GetColorAttribute(const aName: TmXmlString; const aDefaultValue : TColor): TColor; overload;
      procedure GetColorAttribute(const aName: TmXmlString; aValue : TNullableColor);
      {$ENDIF}
  
      procedure SetValue(const aValue: TmXMLString); overload;
      procedure SetValue(const aValue: TNullableString); overload;
  