exclusing some channels from logging

1 files changed, 13 insertions, 9 deletions

diff --git a/irssi-logger/irssi_logger.pl b/irssi-logger/irssi_logger.pl
index 0d92013..d0692d1 100644
--- a/irssi-logger/irssi_logger.pl
+++ b/irssi-logger/irssi_logger.pl
@@ -102,19 +102,23 @@ sub connect_db {
 
 sub write_db {
     my ($nick, $message, $target) = @_;
-    my @vals;
-    my $date = strftime("%Y-%m-%d %H:%M:%S", localtime);
+    if ($target eq "#news" || $target eq "#supersonic" || $target eq "#bookz") {
+        # dont do anything
+    } else {
+        my @vals;
+        my $date = strftime("%Y-%m-%d %H:%M:%S", localtime);
 
-    $dbh = connect_db() unless $dbh;
+        $dbh = connect_db() unless $dbh;
 
-    push(@vals, $date);
-    push(@vals, $nick);
-    push(@vals, $message);
-    push(@vals, $target);
+        push(@vals, $date);
+        push(@vals, $nick);
+        push(@vals, $message);
+        push(@vals, $target);
 
-    defined or $_ = "" for @vals;
+        defined or $_ = "" for @vals;
 
-    $dbh->do($sql, undef, @vals) || Irssi::print("Can't log to DB! " . DBI::errstr);
+        $dbh->do($sql, undef, @vals) || Irssi::print("Can't log to DB! " . DBI::errstr);
+    }
 }
 
 sub log_me {