[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master fe4606f 2/2: Use cl-reduce, not reduce.
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master fe4606f 2/2: Use cl-reduce, not reduce. |
Date: |
Fri, 25 Dec 2015 05:04:09 +0000 |
branch: master
commit fe4606f93b91ff3d046aee0cf21ecc277af7a786
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
Use cl-reduce, not reduce.
---
lisp/net/shr.el | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 0b1a4da..8a3f73e 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -1588,8 +1588,8 @@ The preference is a float determined from
`shr-prefer-media-type'."
(car tbodies))
(t
;; 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)
(shr-ensure-paragraph)