1 files changed, 79 insertions, 0 deletions
diff --git a/mh/tests/fmtfunc.at b/mh/tests/fmtfunc.at
index e3793c49f..bb81f8a01 100644
--- a/mh/tests/fmtfunc.at
+++ b/mh/tests/fmtfunc.at
@@ -590,4 +590,83 @@ X-Date: Mon,  3 Jul 2017 13:17:58
 
 # FIXME: pretty
 
+FMTFUNC([proper],
+[%(proper{From})
+],
+[From: Sergey <gray@gnu.org>
+
+text
+],
+[Sergey <gray@gnu.org>
+])
+
+FMTFUNC([friendly],
+[%(friendly{From})
+%(friendly{To})
+],
+[From: Sergey <gray@gnu.org>
+To: root@example.com
+
+text
+],
+[Sergey
+root@example.com
+])
+
+FMTFUNC([addr],
+[%(addr{From})
+%(addr{To})
+],
+[From: Sergey <gray@gnu.org>
+To: root@example.com
+
+text
+],
+[gray@gnu.org
+root@example.com
+])
+
+FMTFUNC([pers],
+[from=%(pers{From})
+to=%(pers{To})
+],
+[From: Sergey <gray@gnu.org>
+To: root@example.com
+
+text
+],
+[from=Sergey
+to=
+])
+
+# FIXME: note
+
+FMTFUNC([mbox],
+[%(mbox{From})
+],
+[From: Sergey <gray@gnu.org>
+
+],
+[gray
+])
+
+# FIXME: mymbox
+
+FMTFUNC([host],
+[%(host{From})
+],
+[From: Sergey <gray@gnu.org>
+
+],
+[gnu.org
+])
+
+# FIXME: nohost
+
+# FIXME: path
+
+# FIXME: ingrp
+
+# FIXME: gname
+
 m4_popdef([FMTFUNC])
 \ No newline at end of file