on_cast PEAR-Date dispel_self
