From: Michael Andreen <harv@ruin.nu>
Date: Wed, 6 May 2009 20:49:29 +0000 (+0200)
Subject: Add support for bold and color tags
X-Git-Url: https://ruin.nu/git/?a=commitdiff_plain;h=278eecdf5493a966306382275536293de763c94e;p=NDIRC.git

Add support for bold and color tags
---

diff --git a/Context.pm b/Context.pm
index 5d0fb1c..d7c28bb 100644
--- a/Context.pm
+++ b/Context.pm
@@ -97,6 +97,9 @@ sub check_user_roles {
 sub reply {
 	my ($self,$msg) = @_;
 
+	$msg =~ s`<b>(.*?)</b>`${\(chr(2))}$1${\(chr(15))}`gi;
+	$msg =~ s`<c(\d+)>(.*?)</c>`${\(chr(3))}$1$2${\(chr(15))}`gi;
+
 	$self->server->command($self->reply_string . $msg);
 }