zstyle ":completion:*" file-patterns "%p:globbed" "*"
zstyle ":completion:*" matcher-list "" "m:{a-z-}={A-Z_}" "r:|?=** m:{a-z-}={A-Z_}"
zstyle ":completion:*:man:*:*:*" matcher-list "" "m:{a-zA-Z}={A-Za-z} l:|=* r:|=*"
-zstyle ":completion:*" completer _mycomp _mycomp_man:man _parameters _ignored
+zstyle ":completion:*" completer _mycomp_mbox:mbox _mycomp _mycomp_man:man _parameters _ignored
_mycomp () {
[[ $CURRENT -eq 1 ]] && curcontext="${curcontext%:*:*}:-command-:" \
_dispatch "" info info "" -default- && return
}
+local mboxes=()
+for m ($MAILDIR/*(/on)) mboxes=($mboxes $m:t)
+
+_mycomp_mbox () {
+ [[ ${words[1]} == mbox ]] && curcontext=:mbox:${curcontext#:*:} \
+ _values mailboxes $mboxes && return
+}
+
autoload -U compinit ; compinit -d /tmp/.zcompdump
autoload -U complist