From 49cdd857eef2b642e229482fdb7b9cc56cf21df9 Mon Sep 17 00:00:00 2001
From: darkf <lw9k123@gmail.com>
Date: Tue, 17 Dec 2013 01:35:51 -0800
Subject: [PATCH] implement

---
 irc.lamb | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/irc.lamb b/irc.lamb
index 8b8ad5f..984853f 100644
--- a/irc.lamb
+++ b/irc.lamb
@@ -167,6 +167,20 @@ handleMessage(s, nick, chan, "$quit") -> do
 	s
 end.
 
+handleMessage(s, nick, chan, "$at "::line) -> do
+	(toNick, fact) = takeUntilSpace(line);
+	factoids = getFactoids(s);
+	factoid  = map_lookup(factoids, fact);
+	if is_just(factoid) then do
+		say(chan, toNick + ": " + unwrap_maybe(factoid));
+		s
+	end
+	else do
+		say(chan, nick + ": No such factoid: " + fact);
+		s
+	end
+end.
+
 -- unknown command, search factoids
 handleMessage(s, nick, chan, "$"::line) -> do
 	(fact, rest) = takeUntilSpace(line);