Added prog-event helper func.