Fix truncate-message to really truncate to *irc-message-max-length*
Fix truncate-message to really truncate to *irc-message-max-length*

Also raise the max length to 480 bytes.

kanru/cl-sandbox,tlikonen/cl-eval-bot,tlikonen/cl-eval-bot