null+****@clear*****
null+****@clear*****
Thu Apr 12 23:53:53 JST 2012
yuta yamada 2012-04-12 23:53:53 +0900 (Thu, 12 Apr 2012) New Revision: b909121c78a8dc6f464af28b99aa0819cf6e7e5b Log: move "setq word ~~" into "setq content ~~" Modified files: logalimacs.el Modified: logalimacs.el (+1 -2) =================================================================== --- logalimacs.el 2012-04-12 23:48:32 +0900 (3321cda) +++ logalimacs.el 2012-04-12 23:53:53 +0900 (b597e82) @@ -190,8 +190,7 @@ (case manual? (:manual (loga-input)) (t (loga-return-word-on-cursor))))) - (setq word (concat "\"" word "\"")) - (setq content (loga-command word)) + (setq content (loga-command (concat "\"" word "\""))) (if (equal "" content) (message (concat "'" (caar loga-word-cache) content "' is not found")) (case endpoint