Add %(unmailto) format function for List-Post headers

[mmh] / h / fmt_compile.h

diff --git a/h/fmt_compile.h b/h/fmt_compile.h
index f3b2b9b..f034c6c 100644 (file)
--- a/h/fmt_compile.h
+++ b/h/fmt_compile.h
@@ -1,6 +1,6 @@
 /*
 /*

- * fmt_compile.h -- format types
- */
+** fmt_compile.h -- format types
+*/

 
 /* types that output text */
 #define FT_COMP           1    /* the text of a component                 */
 
 /* types that output text */
 #define FT_COMP           1    /* the text of a component                 */

@@ -80,10 +80,6 @@
 #define FT_FORMATADDR    67    /* let external routine format addr    */
 #define FT_MYMBOX        68    /* do "mymbox" test on comp            */
 
 #define FT_FORMATADDR    67    /* let external routine format addr    */
 #define FT_MYMBOX        68    /* do "mymbox" test on comp            */
 

-/* misc. */
-/* ADDTOSEQ only works if you include "options LBL" */
-#define FT_ADDTOSEQ      69    /* add current msg to a sequence       */
-

 /* conditionals & control flow (must be last) */
 #define FT_SAVESTR       70    /* save current str reg               */
 #define FT_DONE          71    /* stop formatting                    */
 /* conditionals & control flow (must be last) */
 #define FT_SAVESTR       70    /* save current str reg               */
 #define FT_DONE          71    /* stop formatting                    */

@@ -105,4 +101,6 @@
 #define FT_V_MATCH       87    /* V = 1 if "str" contains literal    */
 #define FT_V_AMATCH      88    /* V = 1 if "str" starts with literal */
 
 #define FT_V_MATCH       87    /* V = 1 if "str" contains literal    */
 #define FT_V_AMATCH      88    /* V = 1 if "str" starts with literal */
 

+#define FT_LS_UNMAILTO   89    /* remove "mailto:"                   */
+

 #define IF_FUNCS FT_S_NULL    /* start of "if" functions */
 #define IF_FUNCS FT_S_NULL    /* start of "if" functions */