git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@398
c11ca15a-4712-0410-83d8-
924469b57eb5
my($message) = @_;
my($lhs,$mhs,$rhs);
my($result,$reply);
my($message) = @_;
my($lhs,$mhs,$rhs);
my($result,$reply);
$orig{message} = $message;
if (!defined $message or $message =~ /^\s*$/) {
$orig{message} = $message;
if (!defined $message or $message =~ /^\s*$/) {
$lhs = $message;
$mhs = "is";
$rhs = $result;
$lhs = $message;
$mhs = "is";
$rhs = $result;
+
+ return "$lhs $mhs $rhs" if ($literal);