sub working_notice ($) {
my ($message) = @_;
+ &_open_working_notice ($message);
+ &_close_working_notice();
+}
+
+#
+## Private function to lock the page and tell the user what is going on.
+#
+sub _open_working_notice ($) {
+ my ($message) = @_;
+
&Header::openpage($Lang::tr{'intrusion detection system'}, 1, '');
&Header::openbigbox('100%', 'left', '', $errormessage);
&Header::openbox( 'Waiting', 1,);
<td><img src='/images/indicator.gif' alt='$Lang::tr{'aktiv'}' /></td>
<td>$message</td>
</tr>
- </table>
END
+}
+
+#
+## Private function to close a working notice.
+#
+sub _close_working_notice () {
+ print "</table>\n";
+
&Header::closebox();
&Header::closebigbox();
&Header::closepage();