mon->del_ench(ENCH_CHARM, true);

    // If the monster is charmed, make it permanently friendly.  Note
    // that we have to delete the enchantment without removing the
    // enchantment effect, in order to keep the monster from turning
    // hostile.
    mon->del_ench(ENCH_CHARM, true, false);

                {
                    if (tso_blessing_extend_stay(mon))
                        more_time = true;
                }

                    more_time = tso_blessing_extend_stay(mon);