Changing Text in Blocks

Hi,
First, when changing layer, font or even exploding text in a single text everthing works as expected, but in a block only layer is changed but font and exploding text is not changed. How to get this done?
Second, printing the font of the changed single text only responds correctly if changing the font of the object twice. Is this a bug?

#python 3
import rhinoscriptsyntax as rs
import Rhino

def main():
    target_font_name = "MecSoft_Font-1"

    #change of a Single Text
    get_obj = rs.GetObject("Select Single Text")
    rs.TextObjectFont(get_obj, target_font_name)
    print("Single Text Font:", rs.TextObjectFont(get_obj, target_font_name))
    rs.ObjectLayer(get_obj, 'help')
    rs.ExplodeText(get_obj)

    #change of Text in block
    for name in rs.BlockNames(True):
            objects = rs.BlockObjects(name)
            if objects:
                for obj in objects:
                    obj_type = rs.ObjectType(obj)
                    if obj_type == 512:                
                        rs.TextObjectFont(obj, target_font_name)
                        rs.ObjectLayer(obj, 'help')
                        rs.ExplodeText(obj)
if __name__ == "__main__":
    main()

TextTest_env.3dm (2.7 MB)