Fix delete type modifys where no value is given to be deleted. (ITS#2612)

Thanks to Alister Winfield for the patch.
This commit is contained in:
Quanah Gibson-Mount 2006-08-28 01:01:32 +00:00
parent 88ce76f24e
commit 3ee11b1c2a

View file

@ -63,6 +63,11 @@ perl_back_modify(
{
XPUSHs(sv_2mortal(newSVpv( mods->sm_values[i].bv_val, 0 )));
}
// Fix delete attrib without value.
if ( i == 0) {
XPUSHs(sv_newmortal());
}
}
PUTBACK;