fix
r7r-face.el: use cl-dolist