missed sqlite2 bits

[infobot.git] / src / Factoids / Norm.pl

diff --git a/src/Factoids/Norm.pl b/src/Factoids/Norm.pl
index d58d4eda6ff9069d8adf1486cd7e625a876495b5..0d853a984297c3d603669af02a826388bd5fb376 100644 (file)
--- a/src/Factoids/Norm.pl
+++ b/src/Factoids/Norm.pl
@@ -86,12 +86,14 @@ sub switchPerson {
        s/(^|\W)you\'?re(\W|$)/$1you are$2/ig;
 
        if ($addressed) {
+           my $mynick = "UNDEF";
+           $mynick = $conn->nick() if ($conn);
            # is it safe to remove $in from here, too?
-           $in =~ s/yourself/$param{'ircNick'}/i;
-           $in =~ s/(^|\W)are you(\W|$)/$1is $param{'ircNick'}$2/ig;
-           $in =~ s/(^|\W)you are(\W|$)/$1$param{'ircNick'} is$2/ig;
-           $in =~ s/(^|\W)you(\W|$)/$1$param{'ircNick'}$2/ig;
-           $in =~ s/(^|\W)your(\W|$)/$1$param{'ircNick'}\'s$2/ig;
+           $in =~ s/yourself/$mynick/i;
+           $in =~ s/(^|\W)are you(\W|$)/$1is $mynick$2/ig;
+           $in =~ s/(^|\W)you are(\W|$)/$1$mynick is$2/ig;
+           $in =~ s/(^|\W)you(\W|$)/$1$mynick$2/ig;
+           $in =~ s/(^|\W)your(\W|$)/$1$mynick\'s$2/ig;
        }
     }