Changeset 17280

Timestamp:

Apr 2, 2008, 12:00:55 PM (18 years ago)

Author:

jhoblitt

Message:

fix filtering

File:

• trunk/arclog/arclog_readdb.pl (modified) (2 diffs)

trunk/arclog/arclog_readdb.pl

@@ -19 +19 @@
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
 
-my $filter_records = 1;
+my $filter_records = 0;
 
 my $rcfile = "$ENV{HOME}/.arclogrc";
@@ -64 +64 @@
 
     # do not print filtered records
-    if (defined $filter_records) {
+    if ($filter_records) {
         foreach my $filter (@myfilters) {
             next RECORDS if $event =~ /$filter/;