--- trunk/irc-logger.pl	2006/06/19 11:32:16	32
+++ trunk/irc-logger.pl	2006/06/24 22:15:47	33
@@ -18,13 +18,17 @@
 
 ## CONFIG
 
+my $HOSTNAME = `hostname`;
+
 my $NICK = 'irc-logger';
+$NICK .= '-dev' if ($HOSTNAME =~ m/llin/);
 my $CONNECT =
   {Server => 'irc.freenode.net',
    Nick => $NICK,
    Ircname => "try /msg $NICK help",
   };
 my $CHANNEL = '#razmjenavjestina';
+$CHANNEL = '#irc-logger' if ($HOSTNAME =~ m/llin/);
 my $IRC_ALIAS = "log";
 
 my %FOLLOWS =
@@ -506,7 +510,7 @@
 		my $tag = $1;
 		next if (! $tag || $tag =~ m/https?:/i);
 		push @{ $tags->{$tag} }, $arg->{id};
-		warn "+tag $tag: $arg->{id}\n";
+		#warn "+tag $tag: $arg->{id}\n";
 		$cloud->add($tag, "?tag=$tag", scalar @{$tags->{$tag}} + 1);
 	}
 }