:hdrignore [[ name contents -- name contents ignore-p ]]
	so
	s+ "received" $?l ! ?? s- 1 Cr ?.
	s+ "received-spf" $?l ! ?? s- 1 Cr ?.
	s+ "x-greylist" $?l ! ?? s- 1 Cr ?.
	s+ 0 5 $_ "x400-" $?l ! ?? s- 1 Cr ?.
	s- 0
;

:prehdrlist [[ -- int hdr hdr ... hdr ]]
	1 "To" "Date" "Subject" "From"
;

i(read-common)