From 38252cc5541729f4e3b03bcebf36ca8e6beafa7b Mon Sep 17 00:00:00 2001 From: lookshe Date: Wed, 11 Jan 2012 08:42:49 +0100 Subject: ^ added to special characters that will be masked tinyurl now also from acts --- firstseen.pl | 1 + lastseen.pl | 1 + lastspoke.pl | 1 + tinyurl.tcl | 1 + 4 files changed, 4 insertions(+) diff --git a/firstseen.pl b/firstseen.pl index 859ffa2..1e3d305 100644 --- a/firstseen.pl +++ b/firstseen.pl @@ -11,6 +11,7 @@ my $folder=$ARGV[0]; my $nick=$ARGV[2]; $nick=~s/\\/\\\\/g; $nick=~s/\|/\\\|/g; +$nick=~s/\^/\\\^/g; my @files; diff --git a/lastseen.pl b/lastseen.pl index 1c3c6cc..4d78cc5 100644 --- a/lastseen.pl +++ b/lastseen.pl @@ -12,6 +12,7 @@ my $folder=$ARGV[0]; my $nick=$ARGV[2]; $nick=~s/\\/\\\\/g; $nick=~s/\|/\\\|/g; +$nick=~s/\^/\\\^/g; my @files; diff --git a/lastspoke.pl b/lastspoke.pl index 5df925f..09d9104 100644 --- a/lastspoke.pl +++ b/lastspoke.pl @@ -12,6 +12,7 @@ my $chan=$ARGV[1]; my $nick=$ARGV[2]; $nick=~s/\\/\\\\/g; $nick=~s/\|/\\\|/g; +$nick=~s/\^/\\\^/g; my @files; diff --git a/tinyurl.tcl b/tinyurl.tcl index 970d8f6..83cc27a 100644 --- a/tinyurl.tcl +++ b/tinyurl.tcl @@ -17,6 +17,7 @@ set url_length 80 package require http 2.3 bind pubm - "*" scan_text +bind act - "*" scan_text # ----------------------------------------------------------------------------- # Name : scan_text -- cgit v1.2.3