null+****@clear*****
null+****@clear*****
Thu Jun 14 19:05:42 JST 2012
yuta yamada 2012-06-14 19:05:42 +0900 (Thu, 14 Jun 2012) New Revision: a9292e4c97a28d8b1b0ef4e0b0fb4259e2c42205 Log: find-word -> search-word Modified files: logalimacs.el Modified: logalimacs.el (+2 -2) =================================================================== --- logalimacs.el 2012-06-13 20:11:20 +0900 (37f4143) +++ logalimacs.el 2012-06-14 19:05:42 +0900 (62410e9) @@ -197,13 +197,13 @@ ((or :list :register :unregister :version) (minibuffer-message (loga-to-shell cmd task)))))) -(defun loga-lookup-attach-option (find-word) +(defun loga-lookup-attach-option (search-word) (let* ((options '())) (if loga-use-dictionary-option (push "--dictionary" options)) (if (eq loga-current-endpoint :popup) (push "--output=json" options)) - (concat find-word " " (mapconcat 'identity options " ")))) + (concat search-word " " (mapconcat 'identity options " ")))) (defun loga-word-cache (current-search-words) (let* ((cached-list-length (length loga-word-cache)))