Parent Directory | Revision Log | Patch
revision 247 by dpavlin, Tue Aug 18 08:57:47 2009 UTC | revision 275 by dpavlin, Thu Aug 20 17:35:44 2009 UTC | |
---|---|---|
# | Line 48 sub message { | Line 48 sub message { |
48 | } | } |
49 | } | } |
50 | ||
51 | $log->{tag} =~ s{^/.+/([^/]+)$}{$1}; | |
52 | ||
53 | if ( $log->{tag} =~ m{CRON}i && $buf =~ m{^\((\w+)\) (.+) \((.+)\)$} ) { | if ( $log->{tag} =~ m{CRON}i && $buf =~ m{^\((\w+)\) (.+) \((.+)\)$} ) { |
54 | $log->{cron} = { | $log->{cron} = { |
55 | user => $1, | user => $1, |
# | Line 64 sub message { | Line 66 sub message { |
66 | } | } |
67 | ||
68 | warn "log ",dump( $log ); | warn "log ",dump( $log ); |
69 | CouchDB::audit( 'syslog', $log ); | CouchDB::audit( $log->{tag}, $log ); |
70 | } | } |
71 | ||
72 | sub start { | sub start { |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |