qq!<A HREF="${p}edit/part_event.html"><I>Add a new event</I></A>!.
' or <SELECT NAME="clone"><OPTION></OPTION>';
qq!<A HREF="${p}edit/part_event.html"><I>Add a new event</I></A>!.
' or <SELECT NAME="clone"><OPTION></OPTION>';
$html_init .= '<OPTION VALUE="'. $part_event->eventpart. '">'.
$part_event->eventpart. ': '. $part_event->event. '</OPTION>';
}
$html_init .= '<OPTION VALUE="'. $part_event->eventpart. '">'.
$part_event->eventpart. ': '. $part_event->event. '</OPTION>';
}