null+****@clear*****
null+****@clear*****
Thu Jun 28 21:04:05 JST 2012
yuta yamada 2012-06-28 21:04:05 +0900 (Thu, 28 Jun 2012) New Revision: c1a4fb1350986278c5f5f921fb8b02dc3520f4a5 https://github.com/logaling/logalimacs/commit/c1a4fb1350986278c5f5f921fb8b02dc3520f4a5 Log: Collect variable to let* Modified files: logalimacs.el Modified: logalimacs.el (+3 -3) =================================================================== --- logalimacs.el 2012-06-28 20:44:02 +0900 (5017a74) +++ logalimacs.el 2012-06-28 21:04:05 +0900 (d305488) @@ -252,9 +252,9 @@ (loga-command)) (defun loga-lookup (endpoint) - (setq loga-current-command :lookup - loga-current-endpoint endpoint) - (let* ((source-word (loga-decide-source-word)) + (let* ((loga-current-command :lookup) + (loga-current-endpoint endpoint) + (source-word (loga-decide-source-word)) (terminal-output (loga-command (concat "\"" source-word "\"")))) (if (string< "" terminal-output) (case endpoint -------------- next part -------------- An HTML attachment was scrubbed...下载
