function on_xml_read()
    RegisterScriptCallback("on_xml_read", function(xml_file_name, xml_obj)
        local xml_to_change = [[gameplay\npc_profile_mlr.xml]]
        if xml_file_name == xml_to_change then
            local greh_profile = [[
           <character id="red_greh_guide">
	   <class>red_greh_guide</class>
	   <specific_character>red_greh_guide</specific_character>
	   </character>
            ]]
            xml_obj:insertFromXMLString(greh_profile)
        end
    end)
end