use mapc instead of mapcar where appropriate
-rw-r--r-- 4975 visible-mark.el