:zap: use seq.el

replace cl-mapcar with seq-map