lgatto

;; grep -h X-Key */*/cur/* | sed -e 's/X-Keywords: //; s/, /\n/g' | sort | uniq > xkeys.txt

(setq mu4e-xkeys "~/Maildir/xkeys.txt")

(defun read-lines (f)
  "Return a list of lines of a file at f."
  (with-temp-buffer
    (insert-file-contents f)
    (split-string (buffer-string) "\n" t)))