[elpa] externals/pyim bf3626c 05/36: * pyim-common.el (pyim-flatten-list): Move from pyim.el

[ELPA Syncer]

branch: externals/pyim
commit bf3626cb781393571d124767565567b23cd6dc2d
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    * pyim-common.el (pyim-flatten-list): Move from pyim.el
---
 pyim-common.el | 7 +++++++
 pyim.el        | 7 -------
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/pyim-common.el b/pyim-common.el
index a751f34..eba88ba 100644
--- a/pyim-common.el
+++ b/pyim-common.el
@@ -181,6 +181,13 @@ VARIABLE 变量，FORCE-RESTORE 设置为 t 时，强制恢复，变量原来的
       (setq one return)
       (pyim-permutate-list2-internal one (cdr two)))))
 
+(defun pyim-flatten-list (my-list)
+  (cond
+   ((null my-list) nil)
+   ((atom my-list) (list my-list))
+   (t (append (pyim-flatten-list (car my-list))
+              (pyim-flatten-list (cdr my-list))))))
+
 ;; * Footer
 (provide 'pyim-common)
 
diff --git a/pyim.el b/pyim.el
index 3ab09b2..8622146 100644
--- a/pyim.el
+++ b/pyim.el
@@ -3400,13 +3400,6 @@ alist 列表。"
           (insert (pyim-punctuation-return-proper-punct punc-list))
         (insert (car punc-list))))))
 
-(defun pyim-flatten-list (my-list)
-  (cond
-   ((null my-list) nil)
-   ((atom my-list) (list my-list))
-   (t (append (pyim-flatten-list (car my-list))
-              (pyim-flatten-list (cdr my-list))))))
-
 (defun pyim-punctuation-translate (&optional punct-style)
   "将光标前1个或前后连续成对的n个标点符号进行全角/半角转换.