Use standard dolist/mapc in place of -each/--each
Replace -map with standard mapcar
Get rid of all anaphoric macros

Make our code more idiomatic Emacs Lisp by using higher order functions,
i.e. lambdas or apply-partially instead
Simplify expression
Avoid construction of an intermediate list