 
 # {{{ existsUser
 existsUser = (robot, msg, name) ->
+  name = name.toLowerCase()
   return true if name is robot.name
   users = robot.brain.data.usersInfo ||= {}
   for u, v of users


# {{{ UserInfo
setUserInfo = (robot, msg, name, key, val) ->
  return null unless existsUser robot, msg, name
  usersInfo = robot.brain.data.usersInfo ||= {}
  usersInfo[name] ||= {}

# }}}

  robot.respond /([^ ]+)[ ]*の(あだ|アダ)名は?(何|なん|なに)/, (msg) -># {{{
    realname = msg.match[1].toLowerCase()
    unless existsUser robot, msg, realname
      msg.send "#{realname} って誰？"
      checkKeigo robot, msg
