branch: externals/pyim
commit 13e133deaba0701ac292b350a5316dbd616991b2
Author: Feng Shu <tuma...@163.com>
Commit: Feng Shu <tuma...@163.com>
Fix: Warning (comp): ‘pyim-flatten-tree’ is not known to be defined.
---
pyim-common.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/pyim-common.el b/pyim-common.el
index 307c40d185..b84b2ebfc1 100644
--- a/pyim-common.el
+++ b/pyim-common.el
@@ -108,10 +108,10 @@ When CARE-FIRST-ONE is no-nil, ((a b c) (d e)) => (a d)."
(apply #'cl-mapcar
#'list lists))))))
-(if (fboundp 'flatten-tree)
- (defalias 'pyim-flatten-tree 'flatten-tree)
- (defun pyim-flatten-tree (tree)
- "Take TREE and \"flatten\" it."
+(defun pyim-flatten-tree (tree)
+ "Take TREE and \"flatten\" it."
+ (if (fboundp 'flatten-tree)
+ (flatten-tree tree)
(let (elems)
(while (consp tree)
(let ((elem (pop tree)))
