silly

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@1298 c11ca15a-4712-0410-83d8-924469b57eb5

diff --git a/blootbot/src/Modules/case.pl b/blootbot/src/Modules/case.pl
index c41937cde8f5d29efc9fa0906369552c3fec94d7..0ff93b330555be999f995d65947a347d919bf1f1 100644 (file)
--- a/blootbot/src/Modules/case.pl
+++ b/blootbot/src/Modules/case.pl
@@ -9,7 +9,8 @@ package case;
 
 sub upper {
     my($message) = @_;
-    &::performStrictReply(uc $message);
+    # make it green like an old terminal
+    &::performStrictReply("\00303" . uc $message);
 }
 
 sub lower {