null+****@clear*****
null+****@clear*****
Thu Jun 14 20:46:59 JST 2012
yuta yamada 2012-06-14 20:46:59 +0900 (Thu, 14 Jun 2012)
New Revision: b69fe66ba289ba196dd9f929f95bef40e6858f21
Log:
Use collect statement instead of push
Modified files:
logalimacs.el
Modified: logalimacs.el (+2 -2)
===================================================================
--- logalimacs.el 2012-06-14 20:43:41 +0900 (4d2edef)
+++ logalimacs.el 2012-06-14 20:46:59 +0900 (d52bb08)
@@ -355,8 +355,8 @@
(:lookup (setq messages '("search: ")))
(t (setq messages (list messages))))
(loop with record
- for message in messages do
- (push (loga-query message) record)
+ for message in messages
+ collect (loga-query message) into record
finally return (mapconcat 'identity (reverse record) " "))))