Handle hostnames with upper-case letters
[webmin.git] / package-updates / log_parser.pl
1 # log_parser.pl
2 # Functions for parsing this module's logs
3
4 do 'package-updates-lib.pl';
5
6 # parse_webmin_log(user, script, action, type, object, &params)
7 # Converts logged information from this module into human-readable form
8 sub parse_webmin_log
9 {
10 my ($user, $script, $action, $type, $object, $p) = @_;
11 if ($action eq 'update') {
12         return &text('log_update', $object);
13         }
14 elsif ($action eq 'sched') {
15         return $text{$object ? 'log_sched' : 'log_unsched'};
16         }
17 elsif ($action eq 'refresh') {
18         return $text{'log_refresh'};
19         }
20 else {
21         return undef;
22         }
23 }
24