Commit ec2a509c authored by Lars Ingebrigtsen's avatar Lars Ingebrigtsen

Use cl-reduce, not reduce.


(cherry picked from commit fe4606f9)
parent 96ac3142
......@@ -1581,8 +1581,8 @@ The preference is a float determined from `shr-prefer-media-type'."
(car tbodies))
;; Table with multiple tbodies. Convert into a single tbody.
`(tbody nil
,@(reduce 'append (mapcar 'dom-non-text-children tbodies)))))))
`(tbody nil ,@(cl-reduce 'append
(mapcar 'dom-non-text-children tbodies)))))))
(defun shr-tag-table (dom)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment