remove messages from CRON
authorDobrica Pavlinusic <dpavlin@rot13.org>
Sun, 31 Jan 2010 18:28:38 +0000 (18:28 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Sun, 31 Jan 2010 18:28:38 +0000 (18:28 +0000)
lib/PXElator/store.pm

index ecc675a..30b14da 100644 (file)
@@ -64,7 +64,9 @@ sub audit {
 sub query {
        my ( $from_t, $callback ) = @_;
        my $q;
-       $q = { 'package.time' => { '$lt' => $from_t * 1 } } if $from_t;
+       $q->{'package.time'} = { '$lt' => $from_t * 1 } if $from_t;
+#      $q->{'package.name'} = { '$ne' => 'syslogd' };
+       $q->{'tag'} = { '$ne' => 'CRON' };
        warn "# query ", dump($q);
        $audit->ensure_index({ 'package.name' => 1 });
        my $cursor = $audit->query($q)->sort({ 'package.time' => -1 })->limit( 100 );