per discussion here:
http://lists.nongnu.org/archive/html/nmh-workers/2014-05/msg00092.html
%;
[ part %{part} - %{content-type} - %<{description}\
%{description}%?{cdispo-filename}%{cdispo-filename}%|%{ctype-name}%> \
%;
[ part %{part} - %{content-type} - %<{description}\
%{description}%?{cdispo-filename}%{cdispo-filename}%|%{ctype-name}%> \
-%(units(size))B %<(unseen)\(suppressed\)%> ]
+%(kilo(size))B %<(unseen)\(suppressed\)%> ]
#define FT_LS_WEEKDAY 35 /* set "str" to long tws weekday */
#define FT_LS_822DATE 36 /* set "str" to 822 date str */
#define FT_LS_PRETTY 37 /* set "str" to pretty (?) date str */
#define FT_LS_WEEKDAY 35 /* set "str" to long tws weekday */
#define FT_LS_822DATE 36 /* set "str" to 822 date str */
#define FT_LS_PRETTY 37 /* set "str" to pretty (?) date str */
-#define FT_LS_UNITS 38 /* set "str" to "<value>[KMGT]" */
+#define FT_LS_KILO 38 /* set "str" to "<value>[KMGT]" */
#define FT_LV_SEC 39 /* set "value" to tws second */
#define FT_LV_MIN 40 /* set "value" to tws minute */
#define FT_LV_HOUR 41 /* set "value" to tws hour */
#define FT_LV_SEC 39 /* set "value" to tws second */
#define FT_LV_MIN 40 /* set "value" to tws minute */
#define FT_LV_HOUR 41 /* set "value" to tws hour */
component
unquote expr string remove RFC 2822 quotes from \fIstr\fR
trim expr trim trailing whitespace from \fIstr\fR
component
unquote expr string remove RFC 2822 quotes from \fIstr\fR
trim expr trim trailing whitespace from \fIstr\fR
-units expr string convert number to SI units ("15.1K")
+kilo expr string express in SI units: 15.9K, 2.3M, etc.
putstr expr print \fIstr\fR
putstrf expr print \fIstr\fR in a fixed width
putnum expr print \fInum\fR
putstr expr print \fIstr\fR
putstrf expr print \fIstr\fR in a fixed width
putnum expr print \fInum\fR
{ "decodecomp", TF_COMP, FT_LS_DECODECOMP, 0, TFL_PUTS },
{ "decode", TF_EXPR, FT_LS_DECODE, 0, TFL_PUTS },
{ "trim", TF_EXPR, FT_LS_TRIM, 0, 0 },
{ "decodecomp", TF_COMP, FT_LS_DECODECOMP, 0, TFL_PUTS },
{ "decode", TF_EXPR, FT_LS_DECODE, 0, TFL_PUTS },
{ "trim", TF_EXPR, FT_LS_TRIM, 0, 0 },
- { "units", TF_EXPR, FT_LS_UNITS, 0, TFL_PUTS },
+ { "kilo", TF_EXPR, FT_LS_KILO, 0, TFL_PUTS },
{ "compval", TF_COMP, FT_LV_COMP, 0, TFL_PUTN },
{ "compflag", TF_COMP, FT_LV_COMPFLAG, 0, TFL_PUTN },
{ "num", TF_NUM, FT_LV_LIT, 0, TFL_PUTN },
{ "compval", TF_COMP, FT_LV_COMP, 0, TFL_PUTN },
{ "compflag", TF_COMP, FT_LV_COMPFLAG, 0, TFL_PUTN },
{ "num", TF_NUM, FT_LV_LIT, 0, TFL_PUTN },
{
char *unitcp;
unsigned int whole, tenths;
{
char *unitcp;
unsigned int whole, tenths;
case FT_LV_DIVIDE_L: return("LV_DIVIDE_L");
case FT_LV_MODULO_L: return("LV_MODULO_L");
case FT_LV_CHAR_LEFT: return("LV_CHAR_LEFT");
case FT_LV_DIVIDE_L: return("LV_DIVIDE_L");
case FT_LV_MODULO_L: return("LV_MODULO_L");
case FT_LV_CHAR_LEFT: return("LV_CHAR_LEFT");
- case FT_LS_UNITS: return("LS_UNITS");
+ case FT_LS_KILO: return("LS_KILO");
case FT_LS_MONTH: return("LS_MONTH");
case FT_LS_LMONTH: return("LS_LMONTH");
case FT_LS_ZONE: return("LS_ZONE");
case FT_LS_MONTH: return("LS_MONTH");
case FT_LS_LMONTH: return("LS_LMONTH");
case FT_LS_ZONE: return("LS_ZONE");
"%<{description}%{description}" \
"%?{cdispo-filename}%{cdispo-filename}" \
"%|%{ctype-name}%> " \
"%<{description}%{description}" \
"%?{cdispo-filename}%{cdispo-filename}" \
"%|%{ctype-name}%> " \
- "%(units(size))B %<(unseen)\\(suppressed\\)%> ]"
+ "%(kilo(size))B %<(unseen)\\(suppressed\\)%> ]"
static struct format *
compile_marker(char *markerform)
static struct format *
compile_marker(char *markerform)