Форматирование аргументов сообщения

Question

Может кто-нибудь объяснить, почему первое из этих выражений работает так, как ожидалось, а второе - нет?В чем разница между "number one" и DisplayForm@"number one"?

Block[{$MessagePrePrint}, Message[f::event, DisplayForm@"number one"]]

Block[{$MessagePrePrint}, Message[f::event, "number one"]]

Answer 1

Работает на моей машине (v8.0.1, W7-64):

Answer 2

Сообщение об ошибке является подсказкой:

Неизвестное имя ящика (Times) было отправлено как BoxForm для выражения.Проверьте правила формата для выражения.

Полагаю, $MessagePrePrint имеет низкий уровень, например $PreRead, и его вывод должен быть действительной структурой блока.