Changeset 357Tweet

Timestamp:

06/07/10 03:54:08 (3 years ago)

Author:

pynchon

Message:

added !files trigger, fixed logging

File:

• trollforge/pynchon/ffs/ffs.pl (modified) (2 diffs)

trollforge/pynchon/ffs/ffs.pl

@@ -11 +11 @@
 my $chan = shift;
 
-my @trigs = ('@vidz', '@pthc', '@ptsc', '@loli');
+my @trigs = ('!files', '@vidz', '@pthc', '@ptsc', '@loli');
 
 my $c = AnyEvent->condvar;
@@ -35 +35 @@
         publicmsg => sub {
                 my (undef, $c, $msg) = @_;
+                # log everyone who tries a trigger
                 foreach (@trigs) {
                         if ($msg->{params}->[1] eq $_) {
-                                open(my $fh, '>', 'log.txt');
+                                open(my $fh, '>>', 'log.txt');
                                 print $fh "$msg->{prefix} wanted some $msg->{params}->[1]\n";
                                 close($fh);