1#!/usr/local/bin/perl
2# Hide one webmin.com notification
3
4require './webmin-lib.pl';
5our ($hidden_announce_file, %in);
6&ReadParse();
7
8&lock_file($hidden_announce_file);
9&read_file($hidden_announce_file, \%hide);
10$hide{$in{'id'}} = 1;
11&write_file($hidden_announce_file, \%hide);
12&unlock_file($hidden_announce_file);
13
14&redirect("/");
15