From 8d228dae9ab76948940888b5e9fdc85f07e04c41 Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Fri, 11 Apr 2014 17:18:10 +0100 Subject: [PATCH] works, tested --- .gitignore | 1 + via-irctopic | 15 +++++++++++++++ 2 files changed, 16 insertions(+) create mode 100755 via-irctopic diff --git a/.gitignore b/.gitignore index b25c15b..87d8975 100644 --- a/.gitignore +++ b/.gitignore @@ -1 +1,2 @@ *~ +log-*.txt diff --git a/via-irctopic b/via-irctopic new file mode 100755 index 0000000..8dadc0d --- /dev/null +++ b/via-irctopic @@ -0,0 +1,15 @@ +#!/usr/bin/perl -w +use strict; +die unless @ARGV==4; +our ($server,$port,$channel,$msg) = @ARGV; + +chdir "../ircbot.git" or die $!; + +exec qw(./topicedit.tcl), + $server, $port, 'ppizzabot', + $ENV{'PIZZANOTIFY_email'}, + $ENV{'PIZZANOTIFY_name'}, + $channel, + $msg; + +die $!; -- 2.30.2