sub on_sorcerer_cure {
    my $dead = shift;
    my $sorc_cure = read_ply_pnick(read_last_action_result('save', 'cure'));

    # Did cure happen ?
    return undef unless(defined($sorc_cure) && $dead eq $sorc_cure);

    # Announce cure
    say(P_GAMEADV, 'info', $CFG{'day_channel'},
        $messages{'jobs'}{'sorcerer'}{'cure'}, $sorc_cure);

    return 1; # default death_announce action bypassed
}