null+****@clear*****
null+****@clear*****
Wed Jun 27 10:14:15 JST 2012
yuta yamada 2012-06-27 10:14:15 +0900 (Wed, 27 Jun 2012) New Revision: b53770bd93a70b92e6b90e1f9025b317db5ee79d https://github.com/logaling/logalimacs/commit/b53770bd93a70b92e6b90e1f9025b317db5ee79d Log: Use the collect function instead of push function Modified files: logalimacs.el Modified: logalimacs.el (+1 -1) =================================================================== --- logalimacs.el 2012-06-27 10:12:54 +0900 (c80b044) +++ logalimacs.el 2012-06-27 10:14:15 +0900 (68ec96b) @@ -322,7 +322,7 @@ for (source target note source-length target-length) in words if (and (loga-less-than-window-half-p source-length target-length) (> loga-width-limit-source source-length)) - do (push (loga-append-margin source target note size) formated-words) + collect (loga-append-margin source target note size) into formated-words finally return formated-words)) (defun loga-compute-max-length (words) -------------- next part -------------- An HTML attachment was scrubbed... 下载