#autoload
local expl
# This *has* to be improved some day...
if (( ! $+_font_cache )); then
typeset -gU _font_cache
_font_cache=( "${(@)^${(@f)$(xlsfonts)}%%--*}--" )
fi
_description expl font
compgen -M 'r:|-=* r:|=*' "$expl[@]" "$@" -S '' -k _font_cache